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1. INTRODUCTION 



The SDS 940 Time-Sharing Assembly Program (TAP) includes 
mosr features found in other assemblers. Input lines are 
divided into label, operation, operand, and comments 
fields. Instructions and addresses can be represented as 
symbols and used in expressions to form values at assembly 
time. In addition, other more powerful features help to 
alleviate the tedious housekeeping chores usually consid- 
ered a part of machine language programming. 

While some assemblers have a fixed-field format, TAP al- 
lows a free-form format in which the fields are delimited by 
the appearance of one or more blanks. In the examples to 
follow, blanks are represented by the symbol i$. For ex- 
ample, the following lines are identical: 

LOCl-6t>mDA&b-bl3VALUE2 ALMOST ANY © 
+THING GOES©(+specifies continuation)© 

LOa-6LDABVALUE2fcALMOST ANYTHING GOES © 

There must be at least one leading blank if no label appears. 
For example, the following lines are identical: 

-&-DDfcDSTAfcDl5TEM4 © 
fcSTA*TEMP4 © 

Symbols in most assemblers are used to represent memory ad- 
dresses or to identify constants and are usually placed in a 
symbol table as partial word entries. However, in TAP, the 
values of symbols are held in the computer's full word length 
(24 bits) as positive or negative values. The assembly-time 
calculations that can be performed using symbolic expressions 
are, therefore, more general and much more useful. As 
examples, one can write: 

ABC EQU -17 © 

DATA 2*ABC+15© (The integer -19 will 
be formed) 

New operation codes can be defined, and these, as well as 
existing operation codes, can be redefined during assembly. 
It is possible to specify whether (1) an operation code re- 
quires an operand, (2) the operand is truncated to 9 or 14 
bits, or (3) the instruction is a SYSPOP (system programmed 
operator), requiring bit to be set. 

Expressions can be written as follows: 

AB-BC+3, 2 (The ",2" is the fag for indexing) 
A+C-C*37B/10 (Octal numbers are terminated with "B") 
A(AND)(NOT)B(OR)CDEF(EOR)777000B 

The following lines generate the value or 1 : 
DATA XYZ=ABC © 
DATA AB*6<CD+2 © 



or alternatively (if keypunch characters are used): 

DATA XYZ(EQU)ABC © 
DATA AB*6(LSS)CD+2 © 

Literals are provided so that constants can be referred to in 
programs by value, rather than by location. This feature 
makes a program easier to read and relieves the programmer 
from remembering to include all the data. 

LDA =5 © 

LDB =ABC+77770000B(AND)CD© 

LDX =AB=<a)©(The value of the literal is 1 or 0) 

BRU* =DEF© 

Note that the literal can be any general expression. 

The assembler's most powerful feature is its macro facility. 
On the simplest level, a macro can be thought of as an ab- 
breviation or shorthand notation for a body of code that is 
used repetitively in a program. For example, the 940 has 
an SKE (Skip if Equal) instruction but not an SKNE (Skip if 
Not Equal) instruction. Frequently it is convenient to do 
SKNE, but one has to write 

START SKE =' ABC© (Skip if equal to 'ABC') 

BRU *+2©(This is necessary to invert SKE) 
BRU EQULOC©(In case (A)='ABC) 

Accordingly, one can define the macro SKNE as follows: 

SKNE MACRO DUMMY© 

SKE DUMMY (1)© 

BRU *+2 © 

ENDM © 

Then, by using the lines 

SKNE ='ABC © 

BRU EQULOC® 

the code shown at location START above will be generated. 

A macro reference in a body of a program is a directive to 
the assembler to insert a predefined block of in-put lan- 
guage while replacing dummy substrings with argument 
substrings. The block can contain other macros. 

The real power of the macro lies in its ability to substitute 
character strings for values. Further, the macro offers a 
genuine facility for doing calculations at assembly time, 
thus providing for program parameterization. Data areas 
can not only be redimensioned by changing parameter val- 
ues, but different programs can also be produced. The IF, 
ELSF, RPT (repeat), and CRPT (conditional repeat) 
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directives provide these calculation facilities. These di- 
rectives function independently of macros, but their use 
with the macros enables programmers to easily perform ex- 
tremely complex operations. 

TAP statements can be prepared in several ways. Cards may 
be punched at any facility for entry into the system at the 
computer site. Alternatively, the 940 text editor, QED*, 
provides another and much easier way of preparing the sym- 
bolic input for the assembler on-line at the user's teletype. 
The text editor is also used to modify existing source pro- 
grams stored in the system. 

When a source error appears during assembly or execution, 
the user can revert to the text editor in a matter of seconds. 
Laborious input/output operations are avoided because both 
the symbolic and object code are kept in secondary, random- 
access storage. Large programs can be edited on-line and 
reassembled in a fraction of the time required at a key punch, 
because they remain within the system on secondary storage. 

The on-line debugging subsystem, DDT , allows the user 
to insert breakpoint statements, execute single statements, 
and examine and change variables symbolically. Signifi- 
cantly, only a minute fraction of the computer's resources 
is employed while the user is thinking on-line. The Ex- 
ecutive dismisses programs awaiting input and moves them to 
secondary storage. When the user makes his next move, the 
program resumes operation within a second or two. 

To TAP users, the 940 time-sharing software system has the 
structure shown in Figure 1. All symbolic files accessible 
to the user can be accessed with the Executive system, the 
command modes of the text editor (QED), the debugging 
subsystem (DDT), and the assembler (TAP). 

A user can have access to one subsystem (QED, TAP, DDT, 
etc.) at a time; calling a second one releases the first. In 
particular, the contents of the QED text buffers are lost 



The text editor is described in the SDS 940 QED Reference 
Manual. 

The on-line debugging system is described in the SDS 940 
DDT Reference Manual. 



when TAP is called. Therefore, files are used to communi- 
cate data between subsystems. For a complete description 
of the 940 files and their use, refer to the SDS 940 Terminal 
User's Guide. 

TYPOGRAPHIC CONVENTIONS 

For clarity, several typographic conventions have been 
used throughout this manual. These are explained below. 

1. Underscored copy in an example represents copy pro- 
duced by the subsystem in control of the computer. 
Unless otherwise indicated, copy not underscored in an 
example must be typed by the user. 

2. The ® notation appearing after some lines in the 
examples indicates a carriage return. The carriage re- 
turn key is labeled RETURN on the teletype keyboard. 
The user must depress the carriage return key after each 
command to inform the computer that the current com- 
mand is terminated and a new one will begin. The 
computer then upspaces the paper automatically. 

3. The0notation indicates the LINE FEED key. 

4. Non-printing control characters are represented in this 
manual by an alphabetic character and a superscript c 
(e.g., D c ). The user depresses the alphabetic key and 
the Control (CTRL) key simultaneously to obtain a non- 
printing character. For editing purposes some control 
characters will cause a symbol to be printed, but this 
symbol does not appear in the final version of an edited 
line. 



OPERATING PROCEDURES 

The standard procedure for gaining access to an SDS 940 
time-sharing computer, from a teletype terminal, is de- 
scribed in the SDS 940 Terminal User's Guide. The publica- 
tion also includes information concerning the Executive 
system and the calling of various subsystems available to the 
terminal user. The following paragraphs summarize the 
standard procedures as they apply to TAP users. 



Executive Command Language 




Text Editor 

(QED) command mode 



text input mode line edit mode 
(append, insert, (edit and modify) 
and change) 



Time-sharing Assembler On-line Debugging Subsystem other 940 subsystems 
(TAP) command mode (DDT) command mode 



assembly 



program execution debugging 



Figure 1. SDS 940 Time-Sharing Assembly Structure 



2 Typographic Conventions/Operating Procedures 



LOG-IN 

To gain access to the computer, the following operating 
sequence is performed: 



1. 



3. 



5. 



If the FD-HD (Full Duplex-Half Duplex) switch is pres- 
ent, turn the switch to FD. When the teletype is not 
connected to the computer (sometimes called the Local 
Mode), this switch must be in the HD position. 

Press the ORIG (originate) key, which is located at 
the lower right corner of the console directly under the 
telephone dial. This key is depressed to obtain a dial 
tone before dialing the computer center. 

Dial the computer center number. When the computer 
accepts the call, the ringing will change to a high- 
pitched tone. A request that the user log in will ap- 
pear on the teletype: 

PLEASE LOG IN: 



4. The user must then type his account number, password, 
name and, optionally a project code, in the following 
format: 

number password;name;project code © 

Only persons who know all three elements (the account 
number, password, and name) may log in under that 
particular combination. The following examples all 
illustrate acceptable practice. 



PLEASE LOG IN 



PLEASE LOG IN 



PLEASE LOG IN 



C2PASS;JONES;REPUB© 

DlWORD;BROWN;DEMO© 

ElPW;PSEUDO;© 



The optional 1-12 character project code is provided 
for installations that have several programmers using 
the same account number and user name. The project 
code is not checked for validity. 

If the user does not correctly type his account number, 
password, and name within a minute and a half, a mes- 
sage is transmitted instructing him to call the computer 
center for assistance. The computer will then discon- 
nect the user and the dial and log-in procedure will 
have to be repeated. 

If the account number, password (nonprinting), and 
name are accepted by the computer, it will print 
READY, the date, and the time, on the next line. 

READY date, time 



The dash indicates that the 940 Executive is ready to 
accept a command. 



In some 940 time-sharing systems the commercial at sign, 
@. is used to indicate that the 940 Executive is ready to 
accept a command. 



6. In response to the dash, the user types 

QED© 
to call the text editor, or 

TAP© 
to call the assembler, or 

DDT© 
to call the on-line debugging subsystem. 

ESCAPE 

The ESCAPE ©key may be used at any time. It causes the 
subsystem in control to abort the current operation and ask 
for a new command. Striking the©key before terminating 
a command with® aborts the command. 

EXIT AND CONTINUE 

Striking the© key several times in succession causes com- 
puter control to return to the Executive. If the user wants 
to re-enter a subsystem without losing his program and if he 
has not subsequently called any other subsystem, he may 
type CONTINUE in response to the dash. This will return 
him to the previous subsystem so that he may resume his 
work. 

LOG-OUT 

When the user wishes to be disconnected from the computer, 
he types several ©s (to return control to the Executive) and 
then types 

-LOGOUT© 

TIME USED: hours:minutes:seconds 

The computer will respond by printing the amount of hook- 
up (line) time charged to the user's account since the pre- 
vious log-in procedure was completed. 

SAMPLE ON-LINE SESSION 

The following is typical of a session at a teletype terminal. 
The subsystem the user is communicating with usually iden- 
tifies itself by typing a special character at the beginning 
of the current line. The characters and the systems they 
identify are: 

- Executive 
*QED 

1. Log in, as described above. 

2. Enter the text editor by typing its name following the 

- symbol. 

-QED © 



In some 940 time-sharing system configurations the RUBOUT 
or ALT MODE key is used instead of the ESCAPE key. Where 
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You are now in QED, which types an asterisk, "*", 
to indicate readiness for commands. 

If you have a file of TAP statements from an earlier 
session, read it into the main QED text buffer; other- 
wise, create a new program. The QED manual is ex- 
plicit about the commands that are available. 

3. When the program looks ready, write out the main QED 
text buffer onto a symbolic file, where the assembler 
can read it. For example: 

*WRITE/SOURCEl/© 
NEW FILE © 

4. Two ©'s will return you to the Executive, where the 
assembler is called with the command 

-TAP© 

The assembler responds on the next line with 

INPUT: 

5. Specify a source language file, followed by a binary 
output file, and (optionally) a listing file, error mes- 
sage file, and listing mode. For example, ifyouwishto 
assemble from file SOURCE 1, place the binary output 
in file BIN 1, and output the listing at the teletype: 

*I NPUT : /SOURCE/© 

+B INARY : /BIN1/© 

NEW FILE ©© 

+TEXT OUTPUT : TELETYPE 

+ASSEMBLE 



Immediately after the carriage return is typed, assembly 
takes place. At the conclusion of the assembly, TAP 
prints 

number CELLS USED BY PROGRAM 

and other information, depending on the list options 
specified by the LIST and NOLIST directives. 

6. Return to the Executive with two ©'s and call the on- 
line debugging subsystem with the command 

-DDT © 

7. Specify the file where the object code can be found. 
For example: 

;T/BlNl/© 

Loading begins with location 24O3 in this sample. 
After loading is completed, DDT responds on the next 
line with the octal address of the first location following 
the loaded program. 

8. Your program is now ready for execution, which is 
started with the command 

240;G © (begin execution at location 240o) 

9. You may return to the Executive at any time by typing 
several successive ©'s, and then come back to your 
program with the command 

-CONTINUE © 

Then, continue execution with the command 

;P ® (resume execution with the next instruc- 
tion in line for execution) 



10. When finished with this program, you may want to 
call QED or TAP to release the debugging subsystem. 
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2. ASSEMBLER CODING RULES 



LANGUAGE ELEMENTS 

Input to the assembler consists of a sequence of characters 
that are combined to form assembly language elements. 
These language elements, which include symbols, constants, 
expressions, and literals, comprise program statements which 
in turn comprise a source program. 

CHARACTER SET 

The TAP character set is shown in Figure 2. 



Alphabetic: 


A through Z 


Numeric: 


through 9 


Special 


blank 


Characters: 


+ plus sign 




- minus sign 




* asterisk 




/ slash 




, comma 




1 single quotation mark 




( left parenthesis 




) right parenthesis 




= equals sign 




. period or radix point 




< less than symbol 




> greater than symbol 




$ currency symbol 




— left arrow 




: colon 




; semicolon 




? question mark 




[ left bracket 




] right bracket 




" double quotation mark 



Figure 2. TAP Character Set 

The following characters, normally on standard teletype 
keyboards, are not recognized by the assembler: 



% 



& 



@ 



\ t 



These non-recOgnized characters will be replaced by blank 
characters whenever they appear in a TAP statement. 

SYMBOLS 

Numbers may be symbolically represented in assembly lang- 
uage by symbols. 

A symbol is any string of alphanumeric characters not form- 
ing a constant. In particular, it is not necessary that a 
symbol begin with an alphabetic character. Although sym- 
bols may be of arbitrary length, only the first six characters 



of a symbol are used to distinguish it from other symbols. 
When a symbol is used to represent a memory address, it is 
called a label . Examples of symbols are: 

START SIC 3D12 CALCULATE 217AB 

Special characters must not be used in forming symbols. 

CONSTANTS 

A constant is a self-defining language element. Its value is 
inherent in the constant itself, and it is assembled as part of 
the statement in which it appears. 

Three types of constants are permitted in TAP: 

1. decimal integers: one or more decimal digits optionally 
terminated with the letter D. 



2129, 



600D, 



-217 



2. octal integers: one or more octal digits optionally 
terminated with the letter B and, optionally, a single- 
digit octal scaling factor. 

217, 32B, 4B3 (which is the same 

as 4000g) 

3. string: '1-4 characters (except ')' 

All constants are absolute; i.e., their relocation value is 0. 

The assembler normally expects integers to be decimal. 
This can be changed, however, by using a directive (OCT). 
In any case, integers terminated with B or D override the 
normal interpretation of integers. String constants are nor- 
mally not useful in the direct computation of memory add- 
resses, but exist basically to be used in literals (literals are 
described later in this chapter). 

EXPRESSIONS 

An expression is an assembly language element that repre- 
sents a value. It consists of a single constant or symbol or 
a combination of constants and symbols separated by binary 
operators. Examples of expressions are: 

100-2*ABE(OR)DEF/27B 

22 

C12>D19 

OPERATORS AND EXPRESSION EVALUATION 

The operators recognized by the assembler (and their preJ-^p. 
dence) are given below. Operators of highest precedence 
are applied first in the evaluation of expressions. 



Assembler Coding Rules 



Operator 


Function 




Precedence 


+ 


unary plus 




4 


- 


unary negation 




4 


(NOT) 


unary logical inverse 


4 


(R) 


unary relocation 




4 


(LSS) or < 


less than 




3 


(GTR) or > 


greater than 




3 


(EQU) or = 


equal to 




3 


* 


multiplication 




2 


/ 


division 




2 


(AND) 


logical product 




2 


+ 


addition 




1 


- 


subtraction 




1 


(OR) 


logical inclusive 


sum 


1 


(EOR) 


logical exclusive 


sum 


1 



Note that some operators are more than one character long. 
These are enclosed in parentheses to avoid conflict with 
symbols that would otherwise look the same. Parentheses 
are therefore not allowed in expressions to delineate terms 
or to modify the order of evaluation. 

The relational operators (< > =) produce a value 1 if the re- 
lation is true, or if false. There can be only one relation- 
al operator in an expression. 

The assembler evaluates expressions as 24-bit, signed inte- 
gers. Expressions are evaluated from left to right, using 
operators of decreasing precedence. For example, if 

A = 100, B = 200, and C = -1, then 

A+B*C/A = 98 
Again, A = 5432 l g , B = 44444g, and C - 00077g 
then 

A(OR)B(AND)C = 54365g 

As an expression is evaluated, a parallel calculation of its 
relocation value (R) is made. Only absolute expressions 
(R = 0) and relocatable expressions (R = 1) are legal. 

CONSTRAINTS ON RELOCATABILITY OF EXPRESSIONS 

The assembler forces the following constraints on the use of 
expressions: 

1. No relocatable term (R = 1) may occur in conjunction 
with the arithmetic operators * or/. In other words, no 
relocatable symbol may multiply, be multiplied by, 
divide, or be divided by anything. 

2. In the absence of the special relocation operator (see 
below), the final relocation value of an expression may 
be only or 1. 



All operators are binary (i.e., require a preceding and a 
following term) except for the four specifically designated 
as unary. 



3. If the special relocation operator (R) appears in an ex- 
pression, the relocation value of the expression may be 
either or some relocation (such as the value K, where 
K is the special relocation radix). DDT is informed by 
the assembler that special relocation is being used in 
this case. DDT will then multiply the base address by 
K before adding it to the value of the expression. 

SPECIAL RELOCATION 

The special relocation feature permits the programmer limit- 
ed use of expressions that are not absolute or singly reloca- 
table. For example, consider the process of assembling and 
loading a relocatable program. Let the symbol A have value 
3. If one writes 

LDA A ® 

the assembler produces the computer instruction 

07600003B 

and marks the instruction's address as being relocatable. 
Later, when told to load the program beginning at base add- 
ress 10000B, DDT will form 

07610003B 

Thus, no matter where the program is loaded, the memory 
reference will be to the third word from the base address. 

Now, if the user writes 

LDA 2*A © 
The assembler, of course, can form 

07600006B 
and presumably what DDT should form is 



To do this, DDT must be told that 10000B is to be mul- 
tiplied specifically by 2. However, only one bit is re- 
served for such information in the assembler's binary 
output; this fact accounts for the restriction that expres- 
sions may have only the relocation values and 1. This 
restriction can be circumvented by the use of the special 
relocation operator (R). 

Programs may make use of the string-handling System Pro- 
grammed Operators (SYSPOPs). These SYSPOPs use string 
pointers, which contain character addresses (characters 
are packed three per word). A character address consists of 
a memory address multiplied by 3 (plus 0, 1, or 2, depend- 
ing on the position of the character in the word). Thus, if a 
character address is divided by 3, the quotient is the word 
address and the remainder designates the character's 
position in the word. 

To form a character address at assembly time, one must be 

able to multiply a word address (a relocatable item) by a 
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constant (in this case, 3). Thus, if A - 3, the statement 

DATA (R)A+1 © 

will produce the value 

0000001 2B (3*A+1) 

together with a notation to DDT that special relocation ap- 
plies to that value. Later, when told to load the program 
beginning at base (B) address 10000B, DDT will form the 
value 

00030012B (3*A+1)+3*B = 3*(A+B)+1 

In this way, a symbol, representing a relocatable word ad- 
dress, may be used to form character addresses in string 
pointers. 

It should be noted that 3 was the multiplicative constant 
associated with (R) in the example above because of the 
nature of string pointers. This constant is called the special 
r elocation radix. It need not always be 3. In fact, it may 
be changed to any value by the RAD directive. Because of 
the relative importance of string pointers, however, this 
assembler is initialized with the value of (R) set to 3. 
Therefore, it is unnecessary to use RAD to set (R) to 3 (un- 
less it has been changed to some other value). 

LITERALS 

Often, data is placed in a program at assembly time. It is 
frequently convenient to refer to constants by value rather 
than label. A literal is a symbolic reference to a datum by 
value. The assembler allows any expression to be used as a 
literal, which has the form 

= expression 
Some examples of literals are: 

=5 =3*XYZ-2 -'END' =EXTERN 
Programmers frequently write such items as 

LDA FIVE © 

where FIVE is the name of the location containing the value 
5. The programmer must remember to define the symbol 
FIVE somewhere in his program. This can be avoided by the 
use of a literal. For example, 



LDA 



=5 © 



will automatically produce a location containing the correct 

constant in the program. 

When a literal is encountered, the assembler first evaluates 
the expression and looks up its value in a table of literals 
(constructed for each subprogram). If the value is not found 
in the table, it is placed there. In either case, the literal 
is replaced by a reference to the location of its value in the 
literal table. At the end of assembly the literal table is 



included as a part of the object module for the program. 

The following are examples of literals: 

=10 =4B6 =ABC*20-DEF/12 ='HELP' 

=2=AB (This is a conditional literal. Its value will 

be 1 or depending on whether 2=AB is true or 
false at assembly time.) 

It is important to note that the literal table immediately 
follows the program when the program is loaded. 

SYNTAX 

Assembly language elements may be combined with machine 
instructions and assembler directives to form statements. 

STATEMENTS 

Character input to the assembler is arranged into a sequence 
of statements called instructions , directives , or comments . 

Instructions are symbolic representations of computer instruc- 
tions that are translated by the assembler into the computer's 
internal language. Directives, by contrast, are messages 
that serve to control the assembly process or to create data. 
Comments are ignored by the assembler but are included in 
the program listing, serving only to document the meaning 
of a program. 

Statements are logical units of input. They may be delimited 
either by being placed on separate lines (i.e., by being 
separated with carriage returns) or by being separated with 
semicolons. 

Examples of statements are: 

START LDA DAT21 © 
MUL 21B® 
STA ANS © 



START LDA DAT21; MUL 2 IB; STA ANS© 

If a statement requires more than one line, it can be con- 
tinued on the next line by typing a "+" as the first charac- 
ter of the next line, as follows: 

START LDA DAT21; MUL 21 B; STA ANS© 
+THE COMMENT ON THIS LINE REQUIRES© 
+CONTINUATION© 

Consecutive continuation may occur for about five lines 
(320 characters). 



Semicolons do not serve as statement delimiters when used 
between single auotes (as in the TEXT directive) or inside of 
matched parentheses (as in arguments of macro calls). 
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FIELDS 

Directive and instruction statements contain four functional 
fields. The fields are, from left to right, the label field, 
the operation field, the operand field, and the comments 
field. The assembler accepts a free- form statement format; 
the various fields of a statement are delimited by blanks 
rather than by restricting them to fixed places in a line. 
This is explained in more detail below. 

The label field is used mainly for symbol definitions. It 
begins with the first character in the statement and ends on 
the first blank. Thus, in the following statements, the sym- 
bol XYZ appears in two label fields. 



XYZ LDA= 10 © 

STA DEF;XYZ LDA = 10© 

label is omitted 



LDB* LMN 



label is omitted 



The operation field contains a symbolic operation code, a 
directive name, or a macro call. It begins with the first 
nonblank character after the termination of the label field. 
In the statements above, each operation field begins in a 
different position, and it is terminated with a blank, asterisk, 
semicolon, or carriage return. 

The operand and comments fields each begin with the first 
nonblank character after the termination of the preceding 
field. The operand field terminates on the first blank or 
semicolon that is not between matched single quotes or pa- 
rentheses. The carriage return always terminates the field 
(and the statement). The comments field terminates on a 
semicolon or carriage return. Like the comments statement, 
the comments field is not used by the assembler. It may 
contain any sequence of characters. 

COMMENT STATEMENTS 

An entire statement may be used as a comment by writing an 
asterisk as the first character. Any character, except a 
semicolon, may be used in a comment. 

The assembler reproduces the comments on the assembly 
listing and counts comment lines in making line number 
assignments. 

PROCESSING SYMBOLS 

Symbols are used in the label field of a machine instruction 
to represent the location of the instruction in the program. 
In the operand field, a symbol identifies a data value or the 
location of an instruction. 

The treatment of symbols that appear in the label or operand 
field of a directive varies. 



DEFINING SYMBOLS 

A symbol becomes "defined" by its appearance as a label" 
field entry. "Defined" means that it is assigned a value. 

The definition depends on assembly conditions when the 



symbol is encountered, the contents of the operand field, 
and the current contents of the location counter. 

Any instruction statement may be labeled; the label is 
assigned the current value of the location counter; a word 
within the assembler that contains the relative address of 
the instruction. 

The assembler recognizes the following types of symbols: 

LOCAL SYMBOLS 

Local symbols are defined by their use in the label field of 
instructions and in some directives. Their value is that of 
the location counter at their definition. They are, there- 
fore, symbolic addresses of memory locations. These symbols 
are relocatable (R = 1) if the assembly is relocatable; if the 
assembly is absolute, they are absolute. Once defined, a 
local symbol cannot be redefined. Attempts to do so are 
considered errors, and result in the appropriate diagnostic 
in the assembly listing. 

EQUATED SYMBOLS 

Equated symbols may be defined by equating them to an ex- 
pression (using directives EQU, NARG, or NCHR). Their 
relocation value will be the same as the relocation value of 
the expression. Unlike local symbols, equated symbols may 
be given new values at any point in the program. 

CURRENT LOCATION COUNTER SYMBOL 

The character * (if used in the operand field) is defined to 
mean the current value of the location counter. This value 
is relocatable or absolute, depending on the nature of the 
assembly. 

EXTERNAL SYMBOLS 

External symbols are those that are used but not defined in a 
given subprogram. No value can be assigned to them, and it 
is not reasonable to regard them as either absolute or relo- 
catable. An external symbol may be used only as a single term 
and must not be used in an expression having any other terms. 

PROGRAMS 

A program consists of a sequence of statements terminated by 
an END directive. Normally, programs are assembled in 
relocatable form. A program is assembled in absolute self- 
loading form if it begins with an ORG directive. It is pos- 
sible (by using RELORG) to make an absolute assembly to 
be loaded by DDT. 

A relocatable program is one in which all memory addresses 
have been computed relative to the first word (or origin) of 
the program. A loader (for this assembler, DDT) can then 
place the assembled program into memory, beginning at 
whatever location may be specified at load time . Placement 
of the program involves a small calculation. For example, 
if a memory reference is to the nth word of a program and if 
the program is loaded beginning at location k, the loader 
must transform the reference n into absolute address n+k. 
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This calculation is not performed for each word of a program 
since some computer instructions (shifts, for example) do not 
refer to memory locations. Therefore, it is necessary to 
inform the loader whether or not to relocate the value of 
address field for each word of the program. Relocation 
information is determined automatically by the assembler 
and transmitted to the loader as a binary quantity called the 
relocation (R) bit. If R = 1 the address field of the word is 
to be relocated; if R = the address field of the word is 
unchanged. 

An expression value may similarly require relocation, the 
difference being that the relocation calculation applies to 
all 24 bits of the word, not just to the address field. The 
assembler accounts for this difference automatically. 

It is possible to disable relocation in the assembler and to 
do absolute assembly. In this event TAP produces a paper 
tape that can be loaded into core memory using the 940 
FILL switch. 



SUBPROGRAMS 

Before executing a program that has been assembled as 
a series of subprograms, it is necessary to load the subpro- 
gram into memory and link them. The symbols used in a 
given subprogram are general ly local to that subprogram. 



Subprograms do, however, need to refer to symbols that 
are defined in other subprograms. Such symbols are called 
external symbols. The loader's linking process takes care 
of such cross references. 

BASIC STATEMENT ASSEMBLY PROCEDURE 

During pass 1 of the 2-pass process, the operands of instruc- 
tions and some directives are scanned for the presence of 
symbols. If a symbol is present, a table of symbols is 
searched. If the symbol is absent from the table, it is added 
but marked as being undefined (i.e., as having no value). 

Labels are placed into the symbol table during pass 1 in 
similar fashion, except that they are assigned the current 
value of the location counter. If a label has been previously 
defined, it is marked as a duplicate (this is an error). 

At the end of pass 1 the symbol table is examined. All 
undefined symbols are assumed to be external. These sym- 
bols are then output by the assembler (as part of the object 
module for the program) for later use by the loader. During 
pass 2 the labels are not computed; rather, the operand 
file of instructions and directives are evaluated, using the 
defined symbol values. 

In absolute assemblies, the scan for symbols during pass 1 
is disabled. 



3. INSTRUCTIONS 



All SDS 940 instructions may be represented symbolically 
and combined with other assembly language elements to 
form instruction statements. This allows the programmer to 
write symbolic addresses, literals, mnemonic operation 
codes, and asterisks to specify indirect addressing, expres- 
sions to represent references to data, and so on. 

There are two classes of 940 instructions. Class 1 instruc- 
tions include all instructions that may invoke a memory ac- 
cess for an operand. Class 2 instructions, on the other hand, 
include all instructions that normally do not invoke a memory 
access for an operand. Appendix B contains a complete list 
of 940 instructions. 

CLASS 1 1NSTRUCTIONS 

Class 1 instructions generally use the statement operand field; 
the absence thereof implies the value zero. It is possible 
to specify, for each Class 1 instruction, whether or not the 
operand field must be present. It is also possible to specify 
that bit of the instruction word is to be set to one (as in 
SYSPOPs). There are two types of Class 1 instructions: 



Type 0: The address is formed modulo 2 l4 . All in- 
structions making memory references are of this 
type. 

Type 1: The operand is formed modulo 2 . This type 
is used for shift instructions. If indirect ad- 
dressing is used with this type, the address is 
formed modulo 2' . 



Class I instructions have the following form: 



[[$] label] mnemonic [*] [operand [, tag]] [comment] 



Indirect addressing is signified by an asterisk immediately 
following the mnemonic. The use of the dollar sign is ex- 
plained later in this chapter. The tag is used to specify bits 
0, 1, and 2 of the 940 instruction word. 



Instructions 



CUSS 2 INSTRUCTIONS 



OPERATION FIELD 



Class 2 instructions have no operand field. Indirect ad- 
dressing is signified by an asterisk immediately following 
the mnemonic. 

Class 2 instructions have the following form: 



[[$] label] mnemonic [*] [comment] 



The operation field generally contains a mnemonic operation 
code (such as LDA, STA, etc.). However, instruction oper- 
ation codes may also be specified with decimal or octal num- 
bers, as for example: 



[[$ label] 76B[*] [operand [, tag]] [comment] 



INSTRUCTION FIELD PROCESSING 

LABEL FIELD 

A label identifies the instruction or data word being gener- 
ated. The symbol used in the label field is given the cur- 
rent value of the location counter. Generally, instructions 
will have labels if they are referred to elsewhere in the pro- 
gram, although it is not necessary that symbols defined in 
this way be used in references. Symbols defined but not 
referenced are called nulls ; they are marked as such in the 
assembly listing. 

If the same symbol appears in the label field of more than 
one instruction statement, it is marked as a duplicate and 
given the newer value. 

A $ preceding a label defines an external symbol. (See the 
description of the EXT directive in Chapter 4.) 



The assembler shifts the numeric operation code (modulo 
177o) left to the correct position in the computer instruction 
word. In such cases, the instruction is assumed to be Class 
1, type 0, no operand required, and with bit not set. 

OPERAND FIELD 

The operand field contains, at most, two arithmetic expres- 
sions (or a literal and one expression) used to determine the 
address and tag fields of the computer instruction word. The 
tag, if present, is evaluated modulo 2 and must be absolute 
(i.e., non-relocatable). 



COMMENTS FIELD 

The comments field is not processed by the assembler, but 
is copied to the assembly listing. 



4. DIRECTIVES 



Commands to the assembler are called "directives". Direc- 
tives may be combined with other language elements to form 
directive statements. Directive statements, iike instruction 
statements, have four fields: label, operation, operand, 
and comments. 

A label field entry is required for eight directives: EQU, 
EXT, IDENT, MACRO, NARG, NCHR, OPD, and POPD. 

If any of the directives ASC, BES, BSS, COPY, CRPT, 
DATA, IF, RPT, or TEXT are labeled, the label is defined 
as the current value of the location counter and identifies 
the first word of the area generated or specified by the 
directive. 

For other directives a label field entry is ignored; i.e., it 
is not defined, entered in the symbol table, or assigned 
memory locations. As the format of each directive is ex- 
plained, a iCuei fieid entry is shown for each that requires 
or permits a label. For all other directives the label field 
is blank. 

The operation field entry is the directive itself. If this field 



consists of more than one subfield, the directive must be in 
the first subfield, followed by the other required entries. 

Operand field entries vary for the different directives. 
These entries are defined in the discussion of each directive. 
A directive format with a blank operand field implies that 
arguments are ignored for that directive. 

Comments field entries are always optional. 

Although many of the directives are similar, each has a 
specific syntax. Note the summary given below. 



Class 


Directive 


Use 


Data 


COPY 


Generate RCH instruction 


Generation 


DATA 


Generate data 




TEXT 


Generate text 




ASC 


Generate text 


Value 


EQU 


Set or change symbol value 


Declaration 


EXT 


Define external symbol 
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Clas 



Directive Use 



Value 
Declaration 



Assembler 
Control 



NARG 

NCHR 

OPD 
POPD 

BES 
BSS 
ORG 

END 

DEC 

OCT 

RAD 

FRGT 

IDENT 

DELSYM 

RELORG 

RETREL 
FREEZE 

NOEXT 



Equate symbol to number of 
arguments in macro call 

Equate symbol to number of 
characters in operand 

Define operation code 

Define programmed operator 

Block ending symbol 
Block starting symbol 
Program origin: absolute 

assembly 
End of assembly 
Interpret integers as decimal 
Interpret integers as octal 
Set special relocation radix 
Forget name of symbol 
Identify name of program 
Do not transmit symbols to loader 
Assemble relative with absolute 

origin 
Return to relocatable assembly 
Preserve symbols, operation 

codes, and macros 
Do not create external symbols 

Turn on specified listing controls 
Turn off specified listing controls 
Begin new page of assembly 

listing 
Type out remarks in pass 2 

Begin macro definition 
End macro definition 

Begin/end repeat block 
Begin/end conditional repeat 

block 
Begin/end IF body 
Alternative IF body 
Alternative IF body 



In the individual directive descriptions, the name of the 
directive is followed by its syntactical format and an ex- 
planation of its purpose and usage. 



DATA GENERATION DIRECTIVES 

COPY Generate RCH (REGISTER CHANGE) Instruction 



Output and 


LIST 


Listing 


NOLIST 


Control 


PAGE 



REM 



Macro 
Generation 


MACRO 
ENDM 


Conditional 
Assembly 


RPT/ENDR 
CRPT/ENDR 




IF/ENDF 

ELSF 

ELSE 



[[$] label] COPY s [,..., s ] [comment] © 



where 



are special symbols for the functions of the 
various bits. Moreover, these symbols have this 
special meaning only when used with this directive; 
there is no restriction on their use either as symbols 
or as operation codes elsewhere in a program. The 
symbols are: 



Address 
Symbol bit set Function 



AB 

BA 

BX 

XB 

E 

XA 

AX 

N 

X 



23 
22 
21 
20 
19 
18 
17 
16 
15 
14 
2 



Clear A 
Clear B 
Copy (A) 
Copy (B) 
Copy (B) 
Copy (X) 



B 
A 
X 

B 



Bits 15-23 (exponent part) only 

Copy (X) ► A 

Copy (A) - X 

Copy -(A) A (negate A) 

Clear X 



The COPY directive produces an RCH instruction. It takes 
in its operand field a series of the special symbols written in 
any sequence, with each symbol standing for a bit in the 
address field of the instruction. The bits selected by a given 
choice of symbols are merged together to form the address. 
For example, instead of using the instruction CAB (04600004), 
one could write COPY AB. The special symbol AB has the 
value 00000004. 

The advantage of the directive is that unusual combinations 
of bits in the address field — those for which no operation 
codes normally exist — may be created quite naturally. 

To exchange the contents of the B and X registers and negate 
A (only for bits 15-23 of all registers) write 

COPY BX,XB, N,E© 

This directive facilitates some special RCH functions that 
might not otherwise be attempted. For example, 

COPY AX, BX © 

has the effect of loading into X the logical OR (merging) of 
the A and B registers (refer to the SDS 940 Computer Refer- 
ence Manual for more details of the RCH instruction). 



DATA 



Generate Data 



[[$] label] DATA exp^, 



exp J [comment] ® 



The DATA directive is used to produce data in programs. 
Each expression (exp-) in the operand field is evaluated and 
the resulting 24-bit values are assigned to ascending mem- 
ory locations. One or more expressions may be present. 
The label is assigned to the location of the first value. The 
effect of this directive is to create a list of data, the first 
word of which may be labeled. 

Since the expressions are not restricted in any way, any type 
of data can be created with this directive. For example: 

DATA 100,-217B / START, AB*2/DEF, 'NOTE',5 ® 



TEXT 



Generate Text 



[[$] label] TEXT j ' fe . Xt ' ! [comment] © 
L (expression, text} L J j 



Data Generation Directives 
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The TEXT directive is used to create a string of 6-bit trimmed 
ASCII characters, packed four to a word and assigned to 
ascending memory locations. The first word of the string 
can be labeled. The string to be packed can be deline- 
ated by enclosing it in quotes (as in the first form). The sec- 
ond form of the directive must be used if the string contains 
one or more quotes. 

Note: If a statement contains a single quote (or any 

odd number of them), it will not terminate with 
a semicolon; a carriage return must be used. 
For example: 

TEXT 4, THIS WON'T WORK; TEXT © 
+4, DISASTER AHEAD © 

In the line above, the semicolon will be part 
of the text, and the second statement will be 
interpreted as being in the comments field. 
Legal examples are: 

TEXT 4, THIS WILL ' © 
TEXT l,A-OK® 

In the first form of the directive, characters in the last word 
are left-justified and remaining positions filled in by blanks 
(octal 00). In the second form, sufficient characters are 
packed to satisfy the word count. 



ASC 



Generate Text with Three Characters per Word 



'text' 



naiab.a asc | expre jr ; te j [comment]© 



This directive is identical in use to TEXT, except that 8-bit 
characters are packed three per word. The 940 string pro- 
cessing system normally deals with such text. 



EQU 



VALUE DECLARATION DIRECTIVES 

Set or Change Symbol Value 



[$] symbol EQU expression [comment] © 



The EQU directive causes the symbol in its label field to be 
given the value of the expression. The expression must have 
a value when EQU is first encountered; i.e., symbols present 
in the operand field must have been previously defined. It 
is permissible to redefine by EQU any symbol previously 
defined by EQU (or NARG or NCHR, as described below). 
This facility is particularly useful in macros and conditional 
assemblies. 

EXT Define External Symbol 



& , , (directive operandi r -, ._. 

Jsymbol j . j [comment] © 



symbol EXT 



(comment not permitted) © 



$symbol EQU expression [comment] © 



symbol EXT expression [comment] © 



the $ preceding the symbol in the label field causes the 
symbol to be defined externally at the same time it is de- 
fined locally. 

In method 2 the symbol in the label field is defined exter- 
nally. This symbol must have been defined previously in the 
program. The operand and comment fields must be absent. 

Methods 1 and 2 have the same effect; the name and value 
of a local symbol is given to the loader for external pur- 
poses. Occasionally it is desirable to define an external 
symbol whose name is different from that of a local symbol. 
An external symbol may be defined in terms of an expres- 
sion involving local symbols. This is performed by utilizing 
methods 3 and 4. 

In method 3, the symbol is defined both locally and exter- 
nally, at the same time. 

Method 4 differs from method 3 in that the symbol in the 
label field is defined externally only; its name and value 
are completely unknown to the local program. Method 4 is 
particularly useful in situations in which two or more subpro- 
grams, loaded together, have name conflicts. 

For example, assume programs A and B both make use of the 
symbol START, and A not only refers to its own START but 
B's as well. The latter references to START can be changed 
to BEGIN. Then the line 

BEGIN EXT START © 

can be inserted into program B. 

No other changes need be made either to A or B. 

In summary, methods 1-3 define a symbol as both local and 
external. Method 4 defines a symbol as external but not 
I oca I . 

Occasionally, after having written a program, one would 

l:L« ».„ ~,„L~ ~ I:, 4. ~f l__~l L_l- i_ L_ _..i II.. J.r; i 

iiisc iu murvc u ii3i ui iui.ui iyuiuuii iu dc CAicinuny ucimeu. 

A built-in TAP macro, ENTRY, serves the function. For 
example: 



ENTRY A,B, C, D, ... © 
is precisely equivalent to 



A 


EXT © 


B 


EXT © 


C 


EXT © 


D 


EXT © 



NARG Equate Symbol to Number of Arguments in 

Macro Call 



[$] symbol NARG [comment] © 



There are four ways to define external symbols. In method 1 



This directive may be used only in macro definitions. It is 
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mentioned here only for completeness. It operates exactly 
as EQU except that, in place of an expression in the operand 
field, the value of the symbol is set to the number of argu- 
ments used in calling the macro currently being expanded 
(see "Macro Generation Directives"). 

NCHR Equate Symbol to Number of Characters in 

Operand 



[$] symbol NCHR operand [comment] © 



This directive is primarily intended for use in macro defini- 
tions, but it may be used elsewhere. It operates exactly as 
EQU except that, in place of an expression in the operand 
field, the value of the symbol is set to the number of char- 
acters in the operand field (see "Macro Generation Direc- 
tives" for a further explanation of the utility of this 
directive). 



OPD 


Define Operation 


Code 










symbol OPD expressi 
+ (comment] © 


on, class, 


M [, 


type] [, 


sb] © 



/here 



class must be 1 or 2 

ar (address required) may be or 1 

type may be or 1 optional 

sb (sign bit) may be or 1 

The OPD directive gives the programmer the facility to add 
new codes to the existing table of operation codes kept in 
the assembler or to change the current ones. 

Bits governed by the optional items are set to zero if the 
items are missing. As examples of how the directive is used, 
some standard 940 instructions are defined as follows: 

CLA OPD 04600001 B, 2© 

LDA OPD 76B5, 1,1© 

RCY OPD 662B4, 1, 1, 1 ©(Type 1 = SHIFT) 

A hypothetical SYSPOP LLA might be defined by 

LLA OPD 110B5, 1,1,0, l©(class 1, address 

required, type 0, sign bit set). 

In operation, the assembler simply adds new operation codes 
defined by OPD to its operation code table. This table is 
always searched backward, so the new codes are seen first. 
At the beginning of the second pass the original table bound- 
ary is reset; thus, if an operation code is redefined some- 
where during assembly, it is treated identically in both 
passes. 

POPD Define Programmed Operator 



In programs containing POPs it is desirable to provide the 
POPD directive. 



This directive is similar to the OPD and is used in the 

same way. It differs from OPD in that it automatically 

places a branch instruction to the body of the POP routine 

in the POP transfer vector (100 o - 177_). 

o o 

In order to do this, the assembler must know two things: 

1. the location for the branch instruction in the transfer 
vector. 

2. the location of the POP routine (i.e., the address of 
the branch instruction). 

Item 1 is given by the POP code itself. Item 2 is provided 
by the convention that the POPD must immediately precede 
the body of the POP routine. The address of the branch in- 
struction placed in the transfer vector is the current value 
of the location counter. 



ASSEMBLER CONTROL DIRECTIVES 

BES Block Ending Symbol 



[[$] symbol] BES expression [comment]® 



BES reserves a block of storage for which the first loca- 
tion after the block can be labeled (if a symbol is presen 
in the label field). The block size is determined by the 
value of the expression; therefore, the expression must be 
absolute and it must have a value when BES is first en- 
countered (symbols present in the operand field must have 
been previously defined). BES is most useful for labeling 
a block that is to be referred to by indexing with the 
BRX instruction (where the contents of X are usually neg- 
ative). For example, to form the sum of the contents of 
an array, one might write 

LDX =-100 ARRAY HAS 100 ENTRIES © 

CLA© 
LOOP ADD ARRAY,2 NEGATIVE INDEXING HERE© 

BRX *-l© 

STA RESULT© 

HLT© 
ARRAY BES 100© 

BSS Block Starting Symbol 



[[$] symbol] BSS expression [comment]© 



symbol POPD expression, class, [ar] [/type] [, sb]© 
+ [comment] © 



BSS reserves a block of storage for which the first word may 
be labeled (if a symbol is present in the label field). The 
block size is determined by the value of the expression; 
therefore, the expression must be absolute and it must have 
a value when BSS is first encountered. The difference be- 
tween BSS and BES is mat in the case of BSS, the first word 
of the block is labeled; for BES, the first word after the 
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block is labeled by the associated symbol. BSS is most use- 
ful for labeling a block that is referred to by positive indexing. 



ORG 



Absolute Program Origin 



ORG expression [comment] © 



The use of ORG forces an absolute assembly. The location 
counter is initialized to the value of the expression. The 
expression must therefore be absolute, and it must have a 
value when ORG is first encountered. An ORG must pre- 
cede the first instruction or data item in an absolute pro- 
gram, although it does not have to be the first statement. 
The output of the assembler will include a bootstrap loader 
that is capable of loading the program after initiation by 
the 940 FILL switch. 



As explained in Chapter 2 (see "Special Relocation"), it is 
possible in a limited way to have multiple relocation of sym- 
bols. This action is performed when the special relocation 
operator, (R), is used. The value of a symbol preceded by 
(R) is multiplied by a constant (called the radix of the spe- 
cial relocation). The loader is informed of this situation so 
that it can multiply the base address by this same constant 
before performing the relocation. 

Because the special relocation was developed specifically 
to facilitate the assembly of string pointers, this constant is 
initialized to 3. If it is desired to change its value, how- 
ever, the RAD directive must be used. The value of the 
expression in the operand field sets the new value of the 
radix. It must be absolute, and the expression must have a 
value when it is first encountered. 



END 



End of Assembly 



END expression [comment]® 



The END directive terminates the assembly. For relocatable 
assemblies, no expression is used. For absolute assemblies, 
the expression gives the starting location for the program. 
When assembling in the absolute mode (i.e., under control 
of the ORG directive), the assembler produces a paper tape 
that allows for loading with the FILL switch (out of the time- 
sharing mode). If the expression is not included with the 
END directive, the bootstrap loader on this paper tape will 
cause the computer to halt after the tape has been read in. 
Otherwise, control will automatically transfer to the loca- 
tion designated in the expression. 



DEC 



Interpret Integers as Decimal 



DEC [comment] ® 



Integers terminated with a B or D are always interpreted, re- 
spectively, as having either an octal or decimal base. On 
the other hand, integers not terminated with these letters 
may be interpreted either as decimal or octal, depending on 

j.l_ __i.i.: _r i_ :i_L ...:iL;_ aL _ LI TL_ i_ 

iiic icniiiy ui u muue bwm,n wiiiim inc usscniui ci . iiic muuc 

switch is set to decimal by the DEC directive. 

When a new assembly begins, the mode switch is initialized 
to decimal. Thus, the DEC directive is not really necessary 
unless the mode switch has been changed to octal (with the 
OCT directive) and a return to decimal is desired. 

OCT Interpret Integers as Octal 



OCT [comment] © 



This directive sets a mode switch within the assembler to 
interpret unterminated integers as octal. When a new assem- 
bly begins, the mode switch is initialized to decimal. Thus, 
the OCT directives must be used before unterminated octal 
integers can be written. 

RAD Set Special Relocation Radix 



RAD expression [comment] © 



FRGT 


Forget Name of Symbol 


FRGT s. ,...,s [comment]© 
1 n L 



are previously defined symbols. 



The use of FRGT prevents the symbols named in its operand 
field from being listed or delivered to DDT. FRGT is espe- 
cially useful in situations in which symbols have been used 
in macro expansions or conditional assemblies. Frequently 
such symbols have meaning only at assembly time; they have 
no connection whatever with the program being assembled. 
Later, when DDT is used, however, memory locations some- 
times are printed out in terms of these meaningless symbols. 
It is desirable to keep these symbols from being delivered to 
DDT. 



IDENT 



Identify Program 



symbol IDENT [comment] ® 



intkiT iL_ L_l :_ i.L- l_L_l r:_l_l i_ U_ _l~l: l j._ 

ILiLlN l uuuifcJi Hie symuui in inc iuuci iiciu iu uc uciivcicu iu 

DDT as a special identification record. DDT uses the IDENT 
name in conjunction with its treatment of local symbols. In 
the event of a name conflict between local symbols in two 
different subprograms, DDT resolves the ambiguity by link- 
ing the preceding IDENT name to the symbol in question. 

IDENT statements are otherwise useful for editing purposes. 
They are always listed on pass 2, usually on the teletype. 

DELSYM Delete Output of Symbol Table and Defined 

Operation Codes 



DELSYM [comment] © 



DELSYM inhibits the symbol table and operation codes de- 
fined in the course of assembly from being output for later 
use by DDT. Its main purpose is to shorten the object code 
output from the assembler. This might be especially desir- 
able for an absolute assembly (that produces a paper tape 
binary output). 
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RELORG 



Assemble Relative with Absolute Origin 



RETREL Return to Relocatable Assembly 



RELORG expression [comment] © 



It is occasionally desirable to assemble a section of code (as 
in the midst of an otherwise standard program) that will be 
loaded into core in some position, but is destined to run from 
another position in memory (it will first have to be moved 
there in a block). This is particularly useful when preparing 
program overlays. 

RELORG, like ORG, takes an absolute expression denoting 
some origin in memory. It has the following effects: 

1. The current value of the location counter is saved and 
the value of the expression is inserted in its place. 
This fact is not revealed to DDT; however, during load- 
ing, the next instruction assembled will be placed in 
the next memory cell available as if nothing had 
happened. 

2. The mode of assembly is switched to absolute without 
changing the object code format; it still resembles a 
relocatable binary program to DDT. All symbols de- 
fined in terms of the location counter will be absolute. 

It is possible to restore normal relocatable assembly with the 
RETREL directive (see below). 

Some examples of the use of RELORG follow. 

1. A program begins with RELORG 300B and ends with 
END. The assembler's output represents an absolute 
program whose origin is 00300g but it can be loaded 
anywhere, using DDT in the usual fashion. However, 
it is necessary to move the program to location 00300q 
before execution. 

2. The program starts and continues normally as a reloca- 
table program. Then there is a series of RELORGs and 
some RETRELs. The effect is as shown below: 



Relocatable program 



RELORG 100® 

I^^ZZZZ I Absolute program origined to 100 

RELORG 200® 

Absolute program origined to 200 



RETREL © 



Relocatable program 

RELORG 300 © 

Absolute program origined to 300 



RETREL [comment] © 



This directive is used when it is desired to return to reloca- 
table assembly after a RELORG directive. The effects of 
RETREL are: 

1. To restore the location counter to what it would have 
been had the RELORG(s) never been used. 

2. To return the assembly to the relocatable mode. 
FREEZE Preserve Symbols, Operation Codes, and Macros 



FREEZE [comment] © 



Subprograms occasionally share definitions of symbols, oper- 
ation codes, and macros. It is possible to cause the assem- 
bler to take note of the current contents of its symbol and 
operation code tables and the currently defined macros, and 
to include them in future assemblies. This eliminates the 
need for including copies of this information in every sub- 
program's source code. This feature greatly facilitates the 
editing of source code. 

When the FREEZE directive is used, the current table bound- 
aries for symbols and operation codes and the storage area 
for macros is noted and saved for later use. These tables may 
then continue to expand during the current assembly (a sep- 
arate subprogram may be used to make these definitions; it 
will end with FREEZE; END). An assembly will use the sym- 
bols and macros that were defined in a previous assembly 
that used the FREEZE directive if the FREEZE command (see 
TAP Commands, Chapter 5) is issued before the ASSEMBLE 
command 

*FREEZE 

If the FREEZE command is not issued, the symbol table will 
be lost and thus unavailable to this or future assemblies. 

Note: When theassembler has been pre-loaded with symbols, 
operation codes, and macros, it cannot be released 
(i.e., one cannot call another subsystem such as 
DDT, QED, etc.) without the loss of this information. 

| NOEXT j Do Not Create External Symbols 



NOEXT [comment] © 



END 



Because o/its subprogram capability, the assembler automati- 
cally assumes that symbols not defined in a given program 
are external, and will be defined in another subprogram. 
Thus, it does not list the use of such symbols as errors. 

If a program is a free-standing program (i.e., if is complete), 
undefined symbols are errors and should be so noted during 
assembly. The NOEXT directive prevents external symbols 
from being established; undefined symbols are noted as 
errors. The directive must be used at the beginning of a 
program (i.e., before instructions or data have been assem- 
bled). Its use affects the entire program. 
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OUTPUT AND LISTING CONTROL DIRECTIVES 

The assembler provides a means of listing a program during 
assembly, by printing out such items as the location counter, 
binary code being assembled, source program statements, 
etc. The association of these items on one page is fre- 
quently of great help to programmers. Two directives, 
LIST and NOLIST, control this process. 



LIST and NOLIST 



Turn Specified Listing Controls On 
or Off 



LIST 
NOLIST 



[l or 2],[ME] [comment] © 
s,f, . . . ,s n "J [comment] © 



are from a set of special symbols. A list of the 
special mnemonic symbols used in conjunction with 
these two directives is given below. The symbols 
have special meaning only when used with LIST and 
NOLIST. They may be used at any other time for 
any purpose. 



Symbol Meaning 



1 



LCT 
BIN 
SRC 
COM 

MC 
ME 



List during pass 1. (Listing format is controlled by 
other parameters.) The pass 1 listing is followed 
by a pass 2 listing. 

List during pass 2. The listing includes the loca- 
tion counter (LCT), the binary object code (BIN), 
the source language (SRC), the comments (COM), 
and the macro calls (MC). The user can suppress 
any of these options by using the NOLIST direc- 
tive. The external symbols, duplicate symbols, 
and null (non-referenced) symbols will be listed 
at the end of the assembly. 

List location counter value 

List binary object code or values 

List source language 

List comments 

List macro calls 

List certain directives during macro expansions 
(EQU, NCHR, NARG, RPT, CRPT, ENDR, IF, 
ELSF, ELSE, ENDF, ENDM) 



As an example of the meanings of various symbols above, 
the line of code 

A21 STB OUTCHR SAVE POINTER 

might be listed as 

02157 3600217 A21 STB OUTCHR SAVE POINTER 

» — . — '* 'V * v . * 



LCT 



BIN 



SRC 



COM 



It is not necessary to include each possible symbol, but 
rather only those parameters for which changes are de- 
sired. It is, in fact, not necessary to give any symbols. 
For example: 

LIST is equivalent to LIST 2 



At the beginning of an assembly, the assembler initializes 
itself to the following directives: 

LIST 2 



In addition, the complete symbol fable (including null and 
duplicate symbols) and the external symbols are listed at the 
end of the assembly. 



Following is an example of the interaction of the LIST and 
NOLIST directives: 



Directive 



LIST 2,ME 



LIST 

NOLIST MC,ME 

LIST 



Effect 

Pass 2 listing including the macro call 
and code generated by the macro 
expansion 

Pass 2 listing, but only the code gen- 
erated by a macro call is listed. 

Pass 2 listing but not the location 



NOLIST LCT,SRC counter or the source language. 



PAGE 


Begin 


New Page 


Of 


Assembly 


List 


n 9 


PAGE 


[comment] © 











This directive causes a page eject for the assembly list- 
ing medium (unless an automatic page eject has just been 
given). It is used to improve the appearance of the as- 
sembly listing. 



REM 



Type Out Remark During Pass 2 



REM remark to be typed ® 



This directive, when encountered during pass 2, causes 
the remark to be typed "out either on the teletype or 
whatever file has been designated as the output message 
device. This typeout occurs regardless of specified listing 
parameters. The directive may be used for a variety of pur- 
poses: it may inform the user of the progress of assembly; 
it may give him instructions on what to do next (this 
might be especially useful for complicated assemblies); it 
might announce the last date the source language was 
updated; or, it might be used within complex macros to 
show which argument substrings have been created during 
expansion of a highly nested macro (this is useful for de- 
bugging purposes). 



MACRO GENERATION DIRECTIVES 

On the simplest level, a macro name may be thought of 
as an abbreviation or shorthand notation for one or more 
assembly language statements. In this respect it is like 
an operation code. The operation code is the name of 
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a machine instruction and the macro name is the name of a 
sequence of assembly language statements. 

The SDS 940 computer has an instruction for skipping if the 
contents of a specified location are negative, but has none 
for testing the accumulator. SKA (skip if memory and accu- 
mulator do not compare ones) will serve when used with a 
cell whose contents are 40000000B. The meaning of SKA 
used in this wa>> is "skip if A positive". Thus, a programmer 
would write 



SKA =4B7 © 
BRU NEGCASE 



NEGATIVE CASE © 



However, a program may have a logical need for skipping 
if the accumulator is negative. In such a situation, the 
programmer must write 



SKA =4B7© 
BRU *+2 © 
BRU POSCASE 



POSITIVE CASE© 



Both of the above situations are awkward in terms of assem- 
bly language programming. The macro facility allows for 
performing the operations SKAP and SKAN (skip if accumu- 
lator positive or negative) in a simple manner. For example, 
if the programmer defines these operations as macros, with 

SKAP MACRO © 

SKA =4B7 © 

ENDM© 
SKAN MACRO © 

SKA =4B7© 

BRU *+2 © 

ENDM© 



he may now write 

A22 SKAN ® 

BRU 



POSCASE © 



The ability to use SKAP or SKAN reduces the amount of 
code written in the course of a program. This in itself tends 
to reduce errors. A greater advantage is that SKAP and 
SKAN are more indicative of the action that the programmer 
has in mind. Programs written in this way tend to be easier 
to read. Also, a label may be used with a macro call. 
Labels used in this way are usually treated like the labels 
of instructions, they are assigned the current value of the 
location counter (this will be discussed in more detail later). 

MACRO DEFINITION 

Before discussing more complicated use of macros, some ad- 
ditional terminology should be established. A macro is an 
arbitrary sequence of assembly language statements associ- 
ated with a symbolic name . During assembly, the macro is 
held in an area of memory called text storage. Macros may 
be created or defined . To do this one must give the macro 



a name and list the sequence of statements comprising the 
macro. The name and the beginning of the sequence of 
statements in a macro is designated by the use of the MACRO 
directive. The end of the sequence of statements in a macro 
is signaled by the ENDM directive. 



MACRO/ENDM 



Begin/End Macro Definition 



name MACRO [Pi' P?' P?] (comment]© 
ENDM [comment] 



p(i) are parameters defined later in this section. 

When the assembler encounters a MACRO directive, switch 
B (see Figure 3) is set to position 1. The programmer's 
source language is then copied into text storage. The as- 
sembler does not do any processing during this operation. 
When ENDM is encountered, switch B is put back to 
position 0. 



Binary Machine Language 



Assembler 



Source 
Language 
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1 



normal assembly 
macro definition 



macro expansion 

macro definition during macro expansiortto 

be explained in more detail later) * 



Figure 3. Information Flow During Macro Processing 

It is possible that other macro definitions may be embedded 
within a given macro definition. The macro-defining pro- 
cess counts the occurrences of the MACRO directive and 
matches them against the occurrences of ENDM. Switch B 
is placed back in position only when the number of ENDM 
directives equals the number of MACRO directives. Thus, 
MACRO and ENDM constitute opening and closing brackets 
around a segment of source ianguage. "Nested" macro 



structures like the following are possible. 
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NAME1 MACRO® 



NAME2 MACRO© 



NAME 3 MACRO® 



ENDM© 



NAME4 MACRO® 



ENDM® _ 



ENDM® _ 



NAME5 MACRO© 



ENDM® _l 



ENDM® _ 

Use of embedded definitions should be kept to a minimum, 
since large amounts of text storage are required. What is 
important, however, is an understanding of when the various 
macros are defined. In particular, when NAME1 is defined, 
NAME2, NAME3, etc., are not defined; they are copied 
into text storage. NAME2 is not defined until NAME1 is 
used in the operation field of a statement. 

MACRO EXPANSION 

The use of a macro name in the operation field of a state- 
ment is referred to as a macro call . The assembler, upon 
recognizing a macro call, moves switch A to position 1 
(again see Figure 3). Input to the assembler from the origi- 
nal source language ceases temporarily and, instead, input 
is called from text storage. During this period, the macro is 
said to be undergoing expansion. (A macro must first be 

Hf>f!nprl nofnro it- rrtrt r\c* m\\t*r\ 1 

A macro expansion may include other macro calls, and 
these, in turn, may call others. Macros may also call them- 
selves, a process called recursion . When a new macro ex- 
pansion begins within a current macro expansion, informa- 
tion about the progress of the current expansion is preserved 
in the assembler's working storage. Successive macro calls 
cause similar information to be preserved. At the end of 
each nested macro expansion, the most recently initiated 
expansion is resumed. When the initial expansion finally 
terminates, switch A is placed back in position 0. Input 
then resumes from the source language program. 

MACRO ARGUMENTS 

If might be useful to write macros BRAP and BRAN 'branch 
to specified location if contents of the accumulator are pos- 
itive or negative, respectively), rather than SKAP and 
SKAN. In such cases, the branch location is not known 
when the macro is defined; different locations will be used 
for each call. 



The macro processor, therefore, allows the programmer to 
provide some of the information for macro expansion at the 
time the macro is called. This is done (in macro definitions) 
by permitting dummy arguments to be replaced by arguments 
supplied when the macro is called. Each dummy argument 
is referred to in the macro definition by a subscripted sym- 
bol. This symbol (dummy name) is defined in the operand 
field of the MACRO directive. 

For example, the macro BRAP could be defined as 

BRAP MACRO DUM © 
SKAN© 

BRU DUM(l)© 

ENDM© 

When called by the statement 

BRAP POSCASE © 

the macro will expand to the statements 



SKA 

BRU 
BRU 



=4B7© 
*+2© 
POSCASE © 



Note that BRAP is defined in terms of another macro SKAN 
(a matter of choice in this example). Also, note that BRAP 
is intended to take only one argument. Other macros may 
use more than one argument; e.g., the macro CBE (compare 
and branch if equal) takes two arguments. The first argu- 
ment is the location of a cell to be compared for equality 
with the accumulator; the second is a branch location in 
case of equality. The definition of CBE is 

CBE MACRO D © 

SKE D(l)© 

BRU *+2 © 

BRU D(2) © 

ENDM ® 

When called b v the statement 

CBE =21 B, EQLOC© 

the statements generated will be 

SKE =21 B© 

BRU *+2 © 

BRU EQLOC® 



Arguments in a macro call are separated by commas. It is 
possible to include both commas and spaces in a list of argu- 
ments by enclosing some of them in parentheses; the macro 
processor strips off the outermost parentheses of any sub- 
string used in a call. For example, in the call for the 

mrtr-ri~> KA\ \KA 



MUM A,(B,C), (D E)® 
the dummy arguments would be 
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D(l) = A 
D(2) = B,C 
D(3) = D E 

DUMMY ARGUMENTS IN MACRO DEFINITIONS 

Before giving further examples of the use of macros, the 
various ways that dummy arguments may be used in macro 
definitions will be discussed. In general, a dummy argument 
may be referred to thusly: 

dummy(expression) 

The only restriction on the expression is that it can not 
contain other dummies or generated symbols (generated 
symbols are discussed later in this chapter). Furthermore, 
the expression must have a known value when the macro is 
called. It should be noted that a macro call may deliver 
more arguments than are referred to in its definition. 
However, the situation wherein a dummy argument is missing 
from an argument list when the macro call occurs is con- 
sidered to be an error condition. 

More than one dummy may be referred to, by the notation 

dummy (express ion, expression) 
as in the case of the call 

MUM A, B, C, D, E © 
where 

D(3,5)=C,D,E 

This situation may lead to ambiguity, as in the case of the 
call 

MUM A, B, C, (D, E), F © 

where 

D(3,5)= C, D, E, F 

In this case, it is not clear which arguments correspond to 
D(3), D(4), and D(5). To resolve this ambiguity, the 
assembler produces the string 

(C),(D,E),(F) 

The notation 

dummyO 

produces all of the arguments supplied in a macro call, and 
each argument is surrounded by parentheses, as in the 
example above. 

The symbolism 
dummy (0) 



refers to the label field of the macro call. Normally, the 
current value of the location counter is assigned to the label 
used with a macro call (as with any instruction). However, 
explicit use of 

dummy (0) 

causes the label field to be used to transmit another argu- 
ment. This situation is possible in three cases: 

1. The macro contains no references to dummy (0). The 
label field is treated normally in this case; i.e., as- 
signed the current value of the execution location 
counter. 

2. The macro contains at least one reference to dummy(O). 
In this case, the label field merely transmits an argu- 
ment that replaces dummy(O) in the expansion. 

3. The macro contains no references to dummy (0) explicit- 
ly, but does contain 

dum my (express i on) 

where the value of the expression is zero when the 
macro call occurs. In this case the label field is han- 
dled as in case 1 above and is also used to transmit the 
argument referred to by 

dummy (expression) 

as in case 2. 



Thus, in a typical call, we have the following relationships: 
M17 CALL ABC, DEF, 'GM', JKL © 



dummy(O) 



dummy(l) J dummy(3,4) 
dummy() 



Sometimes in a macro definition, if is desirable to refer to 
only a portion of an argument (perhaps to a character or 
a few characters). In the case of a single character this 
may be done by writing 

dummy(expression$expression) 

The first expression designates which argument is being ref- 
erenced; the second expression determines which character 
of that argument is being referenced. If reference to a 
substring of an argument is desired, write 

dummy (express ion $express i on, expressi on) 

The second and third expressions determine the first and last 
characters of the substring, respectively. For example, the 
call 

MUM A^CDE/FGHIJ' © 
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results in 

D(2$3) = D 
D(3$4,7) = HIJ' 

Beginning with the ith character of a specified substring, 
the remaining characters of an argument can be obtained by 
specifying a terminal bound that is larger than the number 
of characters remaining in the argument. Thus the 
specification 

D(3$4J000) = HIJ' 

would obtain the substring beginning with the fourth char- 
acter (of argument 3) and ending with the last character of 
the argument. 



CONCATENATION 

It is frequently useful to compose statements from macro ar- 
guments (or parts of arguments) and other information given 
in the macro definition. This is done by concatenating the 
various objects; i.e., by having the assembler place them 
next to each other in the link. 

To avoid ambiguity, use the dot or period character as 
a concatenation operator. The assembler uses the dot to 
delineate the terms it must deal with; in producing out- 
put, the macro-expansion processor ignores the dots after 
it recognizes the associated terms. Therefore, the dot 



character cannot be used in a macro definition for an 



L 



other purpose. 

For example, the macro STORE stores information into three 
storage cells that begin with the letters A, B, or X, depend- 
ing on which 940 register is used as the source of informa- 
tion. The definition is 



STORE 



MACRO 

ST.D(l) 

ENDM 



P © 
D(2) © 



If the macro is called with 

STORE B,DUM © 

° r STORE A,ZAP © 

the macro will generate 

STB DUM or STA ZAP 



GENERATED SYMBOLS 

Sometimes it is convenient to put a label on an instruction 
within a macro. There are two methods (at least) of doing 



this. The first method involves transmitting the label as a 
macro argument when the macro is called. This allows the 
programmer to control the label being defined and refer to 
it elsewhere in the program. 

However, there are situations in which the label is used 
purely for reasons local to the macro and it will not be ref- 
erenced elsewhere. In cases like this it is desirable to allow 
for the automatic creation of labels. This may be done by 
means of the generated symbol. 

A generated symbol name may be declared when a macro is 
defined. To do this requires both the name and the maximum 
number of generated symbols that will be encountered during 
an expansion. These two items may follow the dummy sym- 
bol name given in the MACRO directive. The actual for- 
mat used is 



name MACRO dummy name, generated name, expression 



For example: 

MUM MACRO D, G,4© 

ENDM© 

In the definition of this macro there might be references to 
G(l), G(2), G(3), and G(4), these being individual gen- 
erated symbols. 

Regarding generated symbols, the macro expansion operates 
in the following fashion. For each macro, a generated sym- 
bol base value is initialized to zero at the beginning of as- 
sembly. As each generated symbol is encountered, the 
expression constituting its subscript is evaluated. This value 
is added to the base value and the sum is produced as a 
string of digits concatenated to the generated symbol name. 
Enough digits are produced to make a resultant symbol of 
six characters. Thus, the first time MUM is called, for 
example, G(2) will be transformed into G00002, G(4) into 
G00004, etc. 

At the end of a macro expansion, the generated symbol base 
value is incremented. The increment is designated by the 
expression following the generated symbol name in the 
MACRO directive (this was 4 in the definition of MUM 
above). Thus, the second call of MUM will produce G00006 
in place of G(2), the third call will produce G00010, etc. 
A generated symbol name should be kept as short as possible; 
it cannot be longer than 5 characters. 

CONVERSION OF A VALUE TO A DIGIT STRING 

As an adjunct to the automatic generation of symbols (or for 
any other purposes for which it may be suitable), a facility 
is provided in the assembler's macro expansion process for 
conversion of the value of an expression at call time, to a 

cfrinrt of norimnl rlinifc Tno rnncf ri i*-f 
- 3 "■ «-»-»»■■■•-*■ -. a ..-. ...~ .w..w~. 

($expression) 

will be replaced by a string of digits equal in value to the 
expression. For example, if X = 5, then 
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AB.($2*X-1) 
will be transformed into 

AB9 

Further examples of the use of this facility appear below. 

NARG AND NCHR DIRECTIVES 

Macros can be more useful if the number of arguments sup- 
plied at call time is not fixed. The precise meaning of a 
macro (and the results of its expansion) may depend on the 
number or the arrangement of its arguments. In order to 
permit this, the macro undergoing expansion must be able 
to determine, at call time, the number of arguments sup- 
plied. The NARG directive makes this possible. 

NARG functions basically like EQU, except that it is used 
without an expression. The basic form is 



[$] symbol NARG [comment] © 



The function of the NARG directive is to equate the value 
of the symbol to the number of arguments supplied to the 
macro currently being expanded. The symbol can then be 
used by itself or in expressions, for any required purpose. 
Examples of the use of NARG appear later. 

It is also useful to be able to determine at call time the 
number of characters in an argument. The NCHR directive 
equates the symbol in its label field to the number of char- 
acters in its operand field. Its form is 



[$] symbol NCHR character string [comment]© 



The operand field of a statement is normally terminated by 
the first blank after the beginning of the field. This rule 
is rescinded if a macro argument containing blanks appears 
in the operand field. For example, in the statement 

XYZ LDA VECTOR, 2 THIS IS A COMMENT © 



the arrows delineate the operand field. Alternatively, if a 
statement like 

TEXT X, D(l). ERROR 
is placed in a macro definition and the macro is called by 

MUM (NON-FATAL ) 
then the TEXT statement will turn out to be 

TEXT X, NON-FATAL ERROR 



(Notice how the operand field terminates in this case.) 

In the same example notice that the message produced by 
the TEXT directive is of unspecified length at definition 
time. Clearly, X must depend on the number of characters 



in D(l). Accordingly, MUM might be defined as 

MUM MACRO D ® 

X NCHR D(l)© 

X EQU X+9 5 FOR 'ERROR', 4 TO© 

+ROUND UP© 

TEXT X/4, D(l). ERROR © 

ENDM © 

CONDITIONAL ASSEMBLY DIRECTIVES 

The programming power of the assembler's macro capability 
is considerably multiplied when it is combined with the 
features explained in this section. These features — basical 
ly the if and repeat capabilities — are called conditional 
assembly capabilities because they permit assembly-time 
calculations to determine which elements of the source 
language are actually assembled. They are, however, not 
strictly a part of the macro capability and may be used 
quite apart from macros. 

RPT/ENDR Begin/End Repeat Block 

The RPT directive is, like the MACRO directive, an open- 
ing bracket for a segment of program called a repeat block. 
The end of the sequence of statements is signaled by the 
ENDR directive. 



[label] RPT e> 


cpression 


(comment] © 






[label] RPT(s= 


e l/ C e 2'J 


e 3 )['- 


.(s=ej[, 


s^])] [comment] © 


ENDR 


[comment] © 









/here 



specifies symbol and e specifies expression. 



Form 1 directs the assembler to repeat the following sequence 
of statements down to the matching ENDR (end repeat) as 
many times as given by the value of the expression. The 
operations performed by form 2 are as follows: 

1. Set the symbol s to the value of e,. 

2. Issue the sequence of statements down to the matching 
ENDR. 

3. Increment s by the value of en or by one (if eo is not 
present). If the new value of s has not passed the 
limit (eg), reissue the sequence of statements to the 
matching ENDR (and increment s) until the value of s 
passes the limit. 

The first parenthesized group determines the number of times 
the repeat is executed and controls the initial value and in- 
crement of a symbol. Subsequent groups (there may be up to 
ten of them) merely control the initial value and increments 
of other symbols in the repeat operation. 

For example, assume that it is desired to create an area of 
storage that is cleared to zeros. The BSS directive cannot 
be used for this purpose since its function (that of reserving 
storage) is basically to advance the assembler's location 
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counter. The problem is readily solved by 

ABC RPT 100© 

DATA © 
ENDR© 



STA 



SUBRSA 



which is equivalent to 

ABC DATA 
DATA 
DATA 
DATA 

DATA 



0© 
0© 
0© 
0© 

0© J 



100 statements 



Note that the label is applied effectively only to the first 
statement. 

As another example, consider the situation wherein it is 
desired to fill an area of storage with data starting with 
and increasing by 5 for each cell. To illustrate: 

X EQU © 

RPT 20 © 

DATA X © 

X EQU X+5 © 

ENDR© 

Alternatively (and more simply) one can write 

RPT (X=0,5, 100)® 

DATA X © 
ENDR © 

Note that in the latter form, the terminal value (i.e., eg) 
does not have to be positive or greater than the initial value 
of the symbol being incremented. Thus, both of the follow- 
ing two sequences are permissible. 



RPT 



(X=100,-5,20)© 



ENDR© 

RPT (X=INIT,-5,-30)© 

ENDR© 

A repeat block may be nested within other repeat blocks. 
This is similar to the nesting of macro definitions within 
other macro definitions; therefore, repeat structures similar 
to that described under "Macro Definition" may be 
constructed. 

It may be desirable to create a pair of macros (SAVE and 
RESTOR) for the purpose of saving active registers at the 
beginning of a subroutine, and restoring the active registers 
at the completion of the subroutine. The macros should 
take a variable number of arguments so that, for example, 
one can write 

SAVE A,SUBRS© 

to generate the instruction 



and also write the macro call 

RESTOR A,B,X, SUBRS© 
to generate the instruction sequence 



LDA 


SUBRSA 


LDB 


SUBRSB 


LDX 


SUBRSX 



First define a generalized macro (MOVE) that is called by 
the same arguments delivered to SAVE and RESTOR, plus 
the strings 'ST' and 'LD' which determine whether to store 
or load. 



MOVE 


MACRO 


D© 


X 


NARG© 






RPT 


(Y=2,X-1)© 




D0).D(Y) 


D(X).D(Y)© 




ENDR© 






ENDM© 





Then (in terms of MOVE) SAVE and RESTOR are readily de- 
fined as 



SAVE 



RESTOR 



MACRO 

MOVE 

ENDM© 

MACRO 

MOVE 

ENDM© 



D© 

ST, D() © 

D © 
LD,D()© 



Many programs make use of flags (memory cells used as bi- 
nary indicators). The SKN (skip if memory negative) in- 
struction makes it easy to test these flags. Assume the con- 
vention that a flag is set if it contains the value -1 and 
reset if it contains the value zero; it is necessary to develop 
the macros SET and RESET to manipulate flags. Addition- 
ally, the name of the active register that will be used for 
the action, together with a list of flag locations must be 
delivered at call time. Calls for these macros might have 
the form 



SET 



RESET 



A,FLG1,FLG2,FLG3© 



X,FLG37, FLG12© 



As in the previous example, an intermediate macro (STORE) 
is used that is called with the same arguments delivered to 
SET and RESET. 



STORE 


MACRO 


D© 


X 


NARG© 






RPT 


(Y=2, X) ® 




ST. D("l) 


D(Y) © 




ENDR© 






ENDM© 





Now SET and RESET can be defined as 
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SET 


MACRO 


D© 




LD.D(l) 


= -1 © 




STORE 


D()© 




ENDM® 




RESET 


MACRO 
CL.D(l)© 


D© 




STORE 


D()® 




ENDM® 




CRPT/ENDR 


Begin/End 


Conditic 



Occasionally it is necessary to perform an indefinite num- 
ber of repeats, with termination of the repeat block being 
determined during the course of the repeat operation. The 
conditional repeat directive, CRPT, serves this function. 
Its effect is like that of RPT and its repeat block, like RPT, 
is terminated by a matching ENDR. However, instead of 
specifying a set number of repeats in the directive itself, 
the associated expression (exp,) is evaluated (in a Boolean 
sense) to determine whether the repeat block should be 
issued. Its form is 



[label] CRPT exp. [, (s=ej, [e 2 ,] eg[. . . @ 
(s=ej, [e 2 /] e 3 )]] [comment] @ 



+(s= 



For example: 

CRPT X>Y © 

ENDR® 



CRPT STOP, (X=l, 2), (Y=-3, 5)© 

ENDR © 
Note that the statement 

CRPT 10© 

will cause an infinite number of repeats. 

The termination of a CRPT operation is governed by the 
value of expn. Zero or negative values of expi signify that 
the repeat operation is to occur. Values of one or greater 
for expi signify that the repeat operation is not to occur. 

IF CAPABILITY 

It is frequently desirable to permit the assembler either to 
assemble or merely skip blocks of statements, depending on 
the value of an expression at assembly time. This is pri- 
marily what is meant by the term conditional assembly. 
Conditional assembly can be done with CRPT by letting the 
condition be given by an expression. For example: 



EQU © condition 
CRPT© C 
) 

: ( 

EQU© 
ENDR © 



arbitrary block of statements 



Note that the line before ENDR is required to terminate the 
CRPT. By using the structure above, conditional assembly 
can be done; the arbitrary block of statements enclosed in 
the repeat body can be assembled on condition. 



IF/ENOF 



Assemble if Expression is True 



The same function, shown in the above example, can be 
performed much more conveniently by the IF directive. Its 
form is 



[label] IF expression [comment] © 

ENDF (comment] © 



As with RPT and CRPT, the IF directive defines the beginning 
of a block of statements (called the IF body ) that is termi- 
nated by a matching ENDF directive. The IF body may 
contain other nested IF bodies in the manner described in 
"Macro Definition". 

For conditional assembly, there are often alternative IF 
bodies to be assembled in case a certain IF body is not as- 
sembled. This situation is most easily dealt with by the use 
of the ELSF and ELSE directives. 



ELSE/ELSF 



Alternative IF Bodies 



ELSF expression [comment]© 
ELSE expression [comment]® 



These provide a termination for the IF body and also begin 
another body to be assembled (again possibly on condition) 
in case the first body is not assembled. For example, con- 
sider the following structure. 

IF e 1 © 

! J body-i 

ELSF e 2 © 
'. | body2 

ELSF e 3 © 
'. J body 3 

ELSE © 

j J body 4 

ENDF © 



If ei>0, bodyi is assembled and bodies 2 3 anf j 4 are 
skipped (regardless of the values e 2 and eq). 

If e^<0 and e 2 >0, body 2 is assembled and bodies ^ 3 ^ 
4 are skipped. 

If e^<0, e 2 <0, and e3>0, body 3 is assembled and bodies j 
2, and 4 are skipped. 

Finally, if e-|<0, e 2 <0, and e 3 <0, only body^ is assembled. 

An example of the use of IF (and other features) follows. 
This example illustrates several of the preceding features 
as well as the power of macros when used recursively. 
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The macro MOVE is intended to take any number of pairs of 
arguments. The first argument of each pair is to be moved 
to the second. Each argument, however, may itself be a 
pair of arguments, which may themselves be pairs, etc. So, 
basically, MOVE extracts pairs of argument structures and 
transmits such a pair to another macro, MOVE1. 



MOVE 


MACRO 


D© 


X 


NARG© 






RPT 


(Y=1,2,X)(Z=2,2)© 




MOVE! 


D(Y), D(Z) © 




ENDR© 






ENDM© 





MOVE1 calls itself recursively until it comes up with a 
single pair of arguments. It then generates code. 



MOVE1 


MACRO 


D,G,2 


G(l) 


NARG 




G(2) 


EQU 







IF 


G(l)=2 




LDA 


DO) 




STA 


D(2) 




ELSE 






RPT 


G(l)/2 


G(2) 


EQU 


G(2)+l 


U 


EQU 


G(2) 




MOVE1 


D(V), D(V+U/2) 




ENDR 






ENDF 






ENDM 





When called by the line 

MOVE A, B © 

the code generated will be 



LDA 
STA 



Wkor. ^r,\\aA kv 



MOVE A, B, C, D© 

the code generated is 

LDA A 

STA B 

LDA C 

STA D 



When called by 




MOVE 


(A, B), (C, D) © 


the code generated is 




LDA 


A 


STA 


C 


LDA 


B 


STA 


D 



Finally, when called by 

MOVE 

the code generated is 

LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 



((A^UCDME^ACH))© 



A 

E 

B 

F 

C 

G 

D 

H 



In this case the main call results in the call 

MOVE 1 (A, B), (C, D), (E, F), (G, H) © 

MOVE! calls itself by 

MOVE 1 A, B, E, F 

and (again) 

MOVE1 A, E 

where the first code is generated. The result is 

MOVE 1 B, F 

Recursion then reverts to the call 

MOVE1 C, D, G,H 

and so on. 

Another macro example is given in Appendix C. 
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5. TAP COMMANDS 



To call the assembler the user types 



-TAP © 



All TAP commands are^entered by typing the first character 
of the command. The remaining characters of the command 
are typed by the system and, except in the case of ASSEMBLE, 



the system then waits for a confirming carriage return pre- 
ceded by any optional parameters. 

The start of a new sequence of control commands is queued 
by an asterisk. Subsequent commands for the same assembly 
are queued by a plus sign. Commands for any assembly ter- 
minate with the ASSEMBLE command. 

Figure 4 summarizes TAP commands and possible user re- 
sponses. Standard assignments are given in Table 1. 



TAP Command 


User 


Response 




Comments 


FREEZE 






© 


Preserves any symbol and macro definitions that were defined by using 
the FREEZE directive in a previous assembly. If the FREEZE command 
is not issued, the symbols will not be available for this assembly or any 
subsequent assemblies. 


INPUT: 


Source file, ... 


© 


User types the input file name(s). Up to ten file names may be speci- 
fied for each assembly. Assembly terminates on an END statement. 


BINARY: 

OLD FILE 

or 
NEW FILE 


Obj( 


set file 


© 
© 


User supplies the binary file name. The file name must be followed by 
the OLD/NEW carriage return confirmation. The user may type "escape" 
if he has provided an erroneous file name. If no binary output is re- 
quired, the NOTHING file must be specified for binary output. If 
more than one binary file name is provided, the last file indicated will 
be used. 


CREF 






© 


A cross reference dictionary listing will be provided at the end of the 
assembly. 


TEXT OUTPUT: 

OLD FILE 

or 
NEW FILE 


Listi 


ng file 


© 
© 


Specifies the file for text output. The file name must be followed by 
the OLD/NEW carriage return confirmation. If TEXT OUTPUT is not 
specified, but the LIST directive or command is used, the teletype is 
used as the output file. If TEXT OUTPUT is specified, but the LIST 
directive or command is not used, the default options of the LIST di- 
rective apply. If TEXT OUTPUT is not specified and the LIST com- 
mand or directive is not used, errors, nulls, and externals are listed 
on the teletype. 


LIST 


(See 


Table 1) 


© 


The user may override standard listing parameters or override those he 
had previously specified with the NOLIST directive. 


NOLIST 


(See 


Table 1) 


© 


The user may override standard listing parameters or those he had pre- 
viously specified with the LIST directive. 


ASSEMBLE 








All input files specified since the initiation of the current control 
sequence will be assembled. 



Figure 4. TAP Commands and User Responses 
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The following examples illustrate typical uses of the TAP 
commands. 

Example 1. Using Standard Listing Assignments 



-TAP 


© 




♦INPUT: /SOURCE/ 


© 


Source language resides on 
file /SOURCE/. 


+BINARY: /BIN/ 


© 


An object code file must be 


NEW FILE 


© 


specified. 


+TEXT OUTPUT: TEL 


© 


The text output will be 1 isted 
on the teletype subject to 
the specified conditions of 
the LIST directive or the 
default options of LIST. 


+ASSEMBLE 




The assembly process is 
initiated. 



The assembly process can be terminated by the user at any 
time by typing two or more©'s in succession. 



Example 2. Overriding Standard Listing Parameters 


*INPUT: /DECK/ © 

+BINARY: /BDK/ © 

OLD FILE © 




+LIST 2 © 
+NOLIST MC,COM © 
+ASSEMBLE 


A pass 2 listing that does 
not include macro calls or 
comments will be output to 
the teletype. 



Regardless of the listing control parameters that have been 
given to the assembler, it can be made to begin listing at 
any time, in either pass, by typing a single©. A listing 
started in this way can be stopped by typing the letter "S". 





Table 1. 


Standard Assi 


gnments 


for TAP Commands 










Command 














Standard Assig 


nmen 


r 






INPUT: file name 
BINARY: file name 
TEXT OUTPUT: file name 












None; must be 
None; must be 
Teletype 


spec 
spec 


fied 
fied 


by 
by 


user, 
user. 


LIST 1 .. 
NOLISTJ 


of following 

1 

2 

LCT 

BIN 

SRC 

COM 

MC 

ME 


parameters 










Not listed 

Listed 

Listed 

Listed 

Listed 

Listed 

Listed 

Not listed 










See the LIST a 


nd NOLIST d 


irectives in 


a 


apter 


4 for 


an explanation o 


f the 


parameters. 
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6. ASSEMBLER ERROR MESSAGES 



Upon discovering an error in the syntax of a program being 
assembled, the assembler will list the statement in question 
and information about the character of the error. The list- 
ing of errors will occur regardless of whether or not regular 
listing is being done. 

ERROR MESSAGES 



Error Meaning 

M Missing field in statement 

O Invalid or undefined operation code 

R Relocation error in expression 

S General syntax error 

U Undefined symbol 



Error messages and their interpretations are given below. The 
first group deals with difficulties found in a single statement. 

Error Meaning 

D Duplicate symbol 

L Error in label field; usually an invalid symbol 



If when calling a macro the user fails to deliver an argument 
required during expansion, the assembler will replace the 
argument with the character "t" and will issue an undefined- 
symbol message at that point. 

The second group of error messages, given in Table 2, deal 
with more complicated difficulties. 



Table 2. Error Messages 



Error Message 


Meaning 


SYMBOL TABLE FULL. ERROR CHECK 


Too many symbols and/or operation codes have been defined. As- 


CONTINUES. 


sembly will continue, but no new symbols or operation codes will 




be recognized. Break the program into subprograms or otherwise 




reduce the number of symbols present. 


LITERAL TABLE FULL. FURTHER LITERALS 


Similar to the case above. Reduce the number of literals present. 


IGNORED. 




MUST ASSEMBLE ABSPGM ON PAPER TAPE. 


The bootstrap loader for self-filling absolute assemblies is intended 




for paper tape only. Designating any other form of output file 




(except NOTHING and TELETYPE, another form of paper tape) 




results in this message. It is possible to assemble an absolute pro- 




gram for loading by DDT (see the RELORG directive). 


INPUT STACK OVERFLOW 


There are too many nested macro calls, repeats, and ifs in combina- 




tion. The stack provided for storing the previous source of input is 




full. This is a disaster. The program must be reorganized. 


EOF— END CARD ASSUMED 


No END statement was found at the end of the program. The 




assembler (except for typing his message) takes the same action 




as it would if it found the END statement. 


ILLEGAL COMMAND 


The assembler does not recognize a command typed in by a user 




when entering TAP. A new command is required. 


INPUT FILE NOT TEXT 


The input file described to the assembler is not a type 3 file (i.e., 




symbolic). 


BAD CHAR 


An unrecognizable character (or one otherwise out of place) is found 




in the text. The character is typed out in octal following the mes- 




sage, replaced by a blank in the text, and assembly continues. 


EOF IN MACRO DEFINITION 


The end of the program is reached, but the assembler is still defin- 




ing a macro. Look for a missing ENDM. 
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Table 2. Error Messages (conf.) 



Error Message 


Meaning 


INPUT STACK UNDERFLOW. 
INPUT BUFFER FULL. 

TOO MUCH MACRO RECURSION. 

TOO MUCH RPT RECURSION. 
TOO MANY ARGS IN MACRO. 

TOO MANY REPEAT ARGS. 

STRING STORE EXCEEDED. 

EOF IN TEXT. 


The opposite problem to the one above. Not too serious. Look 

for the presence of an extra ENDM, ENDR, or ENDF in the program. 

An input statement must be less than 320 characters long. This 
message occurs when the rule is violated. It usually happens when 
macros run wild. Look carefully at the program near where the 
error occurred. 

Too many nested macro calls have occurred, resulting in filling 
available pushdown storage. Reorganize program. 

Similar to above. 

The macro is being called with more arguments than there is space 
for. Reduce the number of arguments in the call. 

In beginning a repeat block, too many requests for automatic in- 
crementing of symbols have been made. Reorganize the block. 

No space remains to store new macro definitions or to do repeats. 
Caution: Old macro definitions are not thrown away. Do not re- 
define macros indiscriminately. Reorganize program. 

The end of the input file has occurred in the middle of a statement. 



INTERPRETATION OF THE ERROR LISTING 

When an error is listed on any file other than TELETYPE, 
the single-letter error message (first group above) is listed 
in the line below at the point where the error was detected. 



In the following line, in Figure 5, there are errors in both 
the label and operand fields. 

Along with each error, the value of the location counter is 
printed out relative to the symbol most recently defined. If 



Location Counter 



Tag Field of 
Instruction 



Operation 
Field 



Operand 
Field 



Source Language 



00172 



CDE+7 



Current value of 
location counter is 
7 cells past the 
symbol CDE 



20117 



PLACE+1 



Location counter 
value 



76 



35 



INMAC 



0000 



10761 



Name of inner- 

which offense 
occurred 



FGH/ 



2*Z - 

IrIIsI 



LDA 



Label cannot Relocation 

terminate with / error 



Expression cannot 
terminate with - 



STA 



LOC, 



OUTMAC 



Name of outer- 
most macro in 
which offense 
occurred 



m 



Missing tag 



Figure 5. Error Listing Line 
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Interpretation of the Error Listing 



the error occurs during macro expansion, the names of the 
innermost and outermost macros are printed, to indicate 
where to look for the error. If only one level of macro 
expansion is involved, then only that name is listed. 



In order to save time when error listings are made on 
the teletype, the single-letter error messages are typed 
out at the left margin. 



7. ASSEMBLER BINARY OUTPUT 



There are two basic formats for assembler output. The selec- 
tion depends on whether an assembly is relocatable or 
absolute. 

RELOCATABLE BINARY OUTPUT 

Information in this type of output is divided into variable- 
length logical records. Each record begins with a control 
word that defines its type. The first nine bits (bits 0-8) of 
each control word distinguish it from the others; the remain- 
ing bits are used in various ways. The control words are 
shown in Table 3. 

Table 3. Control Words for Relocatable Binary Output 



Control Word 


Meaning and Use 


1. OOOXXXXX 


Binary program follows. Update 




location counter by amount given 




in address field of control word. 


2, 1XX 00000 


Programmed operator follows. 




Place branch instruction in loca- 




tion 1XX with address given by 




current location counter. 


3. 200 00000 


End of program. Final record 




of binary format. 


4. 201 XXXXX 


Origin of literal table. The ori- 




gin of the literal table is given 




in the address field. 


5. 202 XXXXX 


Change special relocation radix. 




The new value is given in the 




address field. 


6. 300 00000 


OPD follows. Revert to triplet 




format (see below). 


7. 400 00000 


External symbol definition(s) fol- 




lows. Revert to triplet format. 


8. 500 00000 


Identification record follows. 




Revert to triplet format. 


9. 600 00000 


External symbol usage table fol- 




lows. Revert to triplet format. 


10. 700 00000 


Symbol table follows. Revert to 




triplet format. 



Control words 2, 3, 4, and 5 cause DDT to take various 
actions. No additional information is required for these 
controls; each is complete in itself. This is to be contrasted 
to control words 6 through 10. Each of the latter prepares 
DDT to accept a variable-length list of symbols or operation 
codes. These lists are in so-called "triplet format" because 
the various symbols and codes are handled as three-word 
objects. Each list is terminated with a word of all one's. 

The contents of the address field of control word 1 are added 
to DDT's location counter. This control word signals that a 
binary program (i.e., information to be loaded) follows. 
The format of a binary program consists of blocks of eight 
words. Words in each block are either loadable information 
or control words of types 1 through 5. Controls 6 through 10 
also appear in binary programs; when this happens, however, 
the format immediately reverts to the triplet mode. When 
the list of triplets is terminated, a new block of eight words 
is begun. The first word in this block is always a control 
word of some type. 

There are eight different ways in which DDT treats informa- 
tion being loaded. Therefore, it is necessary that a three- 
bit byte be associated with each word. Each eight-word 
block of binary program format is preceded, then, by a 
word of eight three-bit bytes. The association of bytes to 
words is shown in Figure 6. 



8-Word 
Block 




£ 


-**T • 


< 


1 


2 


3 


4 


5 


6 


7 


8 


^3-Bit^ Bytes 


Word 1 


Word 2 


Word 3 


Word 4 


Word 5 


Word 6 


Word 7 


Word 8 









Figure 6. Relocatable Binary Output Format 
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Each 3-bit byte has one of the following values: 
Byte Value Meaning 



Absolute address: load as is 

Evaluate address (mod 2 ) from external 
symbol usage table 

Relocate address (mod 2 4 ) 

Special relocation applies 

Do not load: interpret word as a control 

Derive entire word from external symbol 
usage table 

Relocate entire word (mod 2 ) 

Literal reference in address field 



For example, a portion of binary output might have the 
following appearance. 



Word 3 



Word 6 



Control Word 




~\ — i — i — i — i — r 



Control Word 



. 3-Bit byte register 



■ Information to be loaded 



Start triplet format 



End triplets: revert to blocked format 




Start triplet format 



End triplet format 



The format of a triplet depends on whether it represents a 
symbol or a user-defined operation code. For symbols, the 
following format is used: 



WD1 



WD2 



WD3 



c l 


C 2 


C 3 


C 4 





56 




11 12 


17 18 


23 


C 5 


C 6 


xxxxxx 


zeros 





56 




11 12 


17 18 


23 


Symbol Value 







23 



Cj through Cz are the six significant characters of the sym- 
bol, I eft- justified, with trailing blanks. Bits 12 through 17 
of WD2 are flags having the following meanings. 

Bit Meaning 

12 Relocatable symbol 

13 Duplicate symbol 

14 External symbol 

15 Null symbol 

16 Generated symbol 

17 Equated symbol 

User-defined operation codes have the format 



WD1 



WD2 



c , 


C 2 


C 3 


C 4 





56 


11 12 17 18 23 


C 5 


C 6 


Zeros 







56 



11 12 



23 



The format of WD3 depends on the type of operation code. 
The various possibilities are shown below: 

1. Class 1 instructions 

WD3 






op or pop 
code 


X 


zeros 


X 


zeros 


X 



1 8 9 

Bit Meaning 

9 Set sign bit of instruction 

19 Operand required 

23 Type number (0 or 1) 



19 



23 
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Mnemonic 


Operation 


Code 


Function 


Mnemonic 


LOAD/STORE 








BRANCH 


LDA 


76 




Load A 


BRU 


STA 


35 




Store A 


BRX 


LDB 


75 




Load B 




STB 


36 




Store B 


BRM 


LDX 


71 




Load X 


BRR 


STX 


37 




Store X 


BRI 


EAX 


77 




Copy effective ad- 
dress into X 




XMA 


62 




Exchange M and A 


TEST/SKIP 


ARITHMETIC 








SKS 


ADD 


55 




Add M to A 


SKE 

SKG 

SKR 


ADC 


57 




Add with carry 


ADM 


63 




Add A to M 


MIN 


61 




Memory increment 


SKM 


SUB 


54 




Subtract M from A 


sue 


56 




Subtract with carry 


SKN 
SKA 


MUL 


64 




Multiply 


DIV 


65 




Divide 


SKB 


LOGICAL 








SKD 



Operation Code Function 



ETR 

MRG 

EOR 



14 
16 
17 



REGISTER CHANGE 

RCH 46 

CLA 46 00001 

CLB 46 00002 

CLAB 46 00003 

CLX 2 46 00000 

CLEAR 2 46 00003 

CAB 46 00004 

CBA 46 00010 

XAB 46 00014 

BAC 46 00012 

ABC 46 00005 

CXA 46 00200 

CAX 46 00400 

XXA 46 00600 

CBX 46 00020 

CXB 46 00040 

XXB 46 00060 

STE 46 00122 

LDE 46 00140 

XEE 46 00160 

CNA 46 01000 

AXC 46 00401 



Extract (AND) 
Merge (OR) 
Exclusive OR 



Register change 
Clear A 
Clear B 
Clear AB 
Clear X 

Clear A, B and X 
Copy A into B 
Copy B into A 
Exchange A and B 
Copy B into A, 

clearing B 
Copy A into B, 

clearing A 
Copy X into A 
Copy A into X 
Exchange X and A 
Copy B into X 
Copy X into B 
Exchange X and B 
Store exponent 
Load exponent 
Exchange exponents 
Copy negative into A 
CopyAtoX, clear A 



SHIFT 

RSH 

RCY 

LRSH 

LSH 

LCY 

NOD 



01 
41 

43 
51 
11 



40 
50 
73 
60 

70 

53 
72 

52 

74 



66 OOxxx 
66 20xxx 
66 24xxx 
67 OOxxx 
67 20xxx 
67 lOxxx 



CONTROL 

HLT, ZRO 00 

NOP 20 

EXU 23 



BREAKPOINT TESTS 



BPTx 
OVERFLOW 

ROV 
REO 

OVT 

OTO 



40 20xx0 

22 00001 
22 00010 

22 00101 

22 00100 



Branch unconditionally 
Increment X and 

branch 
Mark place and branch 
Return branch 
Branch and return 

from interrupt 

routine 



Skip if signal not set 
Skip if A equals M 
Skip if A greater than M 
Reduce M, skip if 

negative 
Skip if A = M on B 

mask 
Skip if M negative 
Skip if M and A do not 

compare one's 
Skip if M and B do not 

compare one's 
Difference exponents 

and skip 



Right shift AB 
Right cycle AB 
Logical right shift 
Left shift AB 
Left cycle AB 
Normalize and decre- 
ment X 



Halt 

No operation 

Execute 



Breakpoint test 



Reset overflow 
Record exponent 

overflow 
Overflow test and 

reset 
Overflow test only 
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Mnemonic 



INTERRUPT 



Operation Cede 



EIR 





02 


20002 


DIR 





02 


20004 


AIR 





02 


20020 


IET 





40 


20002 


IDT 


40 20004 


CHANNEL TESTS 








CATW 


40 


14000 


CETW 





40 


11000 


CZTW 





40 


12000 


CITW 





40 


12000 


INPUT/OUTPUT 








EOD 




06 




MIW 




12 




WIM 




32 




PIN 




33 




POT 




13 




EOM 




02 




BETW 





40 


20010 


BRTW 





40 


21000 



SYSP0PS 

BIO 

BRS 

CIO 

CTRL 

DBI 

DBO 

DBI 

DWO 

EXS 

FAD 
FDV 
FFAD 

FFDV 

FFMP 

FFSB 

FLDF 



576 
573 
561 
572 
542 
543 
544 
545 
552 

556 
553 
510 

513 

512 

511 

514 



Function 


Mnemonic 




FSTF 


Enable interrupts 


GCD 


Disable interrupts 




Arm/disarm interrupts 


GCI 


Interrupt enabled test 




Interrupt disabled test 


ISC 




1ST 


Channel W active 




test 


LAS 


Channel W error test 




Channel W zero count 


LDP 


test 


OST 


Channel W inter- 




record test 


OUTF 




QFAD 




QFDI 


Energize output to 




direct access 


QFDV 


channel 




M into W buffer when 


QFMP 


empty 




W buffer into M when 


QFNA 


full 




Parallel input 


QFSB 


Parallel output 




Energize output M 


QFSI 


W buffer error test 




W buffer ready test 


QLDF 




QSTF 




SAS 


Block I/O 


SBRM 


Branch to system 


SBRR 


Character I/O 


SIC 



Control 

Drum block input 

Drum block output SKNF 

Drum word input 

Drum word output 

Execute instruction SKSE 

in system mode SKSG 

Floating add STI 

Floating divide STP 

FORTRAN floating TCI 

add 
FORTRAN floating TCO 

divide 
FORTRAN floating WCD 

multiply 
FORTRAN floating WCH 

subtract WCI 

FORTRAN floating 

load WIO 



Operation Code 


Function 


515 


FORTRAN floating 




store 


537 


Get character and 




decrement 


565 


Get character and 




increment 


541 


Internal to string con- 




version (floating 




output) 


550 


Input from specified 




teletype 


546 


Load from secondary 




memory 


566 


Load pointer (AB) 


551 


Output to specified 




teletype 


517 


Skip if no floating 




overflow 


500 


Quick floating add 


505 


Quick floating in- 




verted divide 


504 


Quick floating 




divide 


503 


Quick floating 




multiply 


520 


Quick floating 




negate 


501 


Quick floating 




subtract 


502 


Quick floating in- 




verted subtract 


506 


Quick floating load 


507 


Quick floating store 


547 


Store in secondary 




memory 


570 


System BRM 


571 


System BRR 


540 


String to internal 




conversion (float- 




ina innut^ 
- - -^ - - -| — - / 


516 


Skip if floating ac- 




cumulation neg- 




ative 


563 


Skip on string equal 


562 


Skip on string greater 


536 


Simulate teletype inpul 


567 


Store pointer 


574 


Teletype character 




input 


575 


Teletype character 




output 


535 


Write character and 




decrement 


564 


Write character 


557 


Write character and 




increment 


560 


Word I/O 
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APPENDIX C. MACRO EXAMPLE 



The following example makes use of virtually every feature 
in the macro and conditional assembly processes. It is pre- 
sented as a demonstration of the power inherent in the use 
of macros. 

The macro COMPILE, when called with an arithmetic ex- 
pression for its argument, produces assembly language code 
that computes the value of the expression in a minimum num- 
ber of steps (subject to the left-to-right scan technique used). 
COMPILE, in turn, calls a number of other macros. Their 
functions are explained by comments in the text below. 

The COMPILE macro initializes several variables and calls 
EXPAND (where the more difficult work is done). J is the 
total number of characters in the expression. K is used to 
keep track of the recursion level on which the work is be- 
ing done (EXPAND calls itself recursively when it en- 
counters an opening bracket [ ). AVAIL is the counter for 
available temporary storage. NPTR and PPTR are stack 
pointers for the operand and operator stacks, respectively. 



COMPILE MACRO D;J NCHR D(1);K EQU 0® 
; AVAIL EQU 1;NPTR EQU -1;PPTR EQU -1© 
EXPAND D(l) ; ENDM © 



EXPAND first initializes I, the current character pointer. 
It then places the value zero on the operator stack (marking 
its beginning on the current level) and fetches the first oper- 
and. Then it sets a switch (G(l)) and goes into a cycle of 
fetching operators (GETP) and operands (GETN). If the 
precedence of new operators is less than or equal to that of 
the previous operators, code is generated. Otherwise the 
information is stacked and the scan continued. 



EXPAND MACRO D,G,1;I EQU 1;K EQU K+l© 
STACK 0,P; GETN D(l); SET G(l)© 
CRPT G(l)© 

IF KJ; GETP D(1$I)© 
ELSE;OPTOR EQU 11; RESET G(l)© 
ENDF© 

;PSTAK EQU PST.($PPTR)© 
CRPT OPTOR/10<PSTAK/10+1; GEN D(l)© 
ENDR© 

IF 0PT0R=11;PPTR EQU PPTR-1; RESET G(l)© 
;K EQU K-1;I EQU I.($K)+I-1© 
ELSE; STACK 0PT0R,P© 
IF NPTR>0© 

IF NST.($NPTR-1)<0© 

IF NST.($NPTR-1)=-1© 
STA TEMP. ($A VAIL)© 
ELSE ; RSH i ; STB TEMP. ($AVAIL) © 
ENDF© 

;NST.($NPTR-1) EQU AVAIL© 
;AVAIL EQU AVAIL+1 © 
ENDF © 
ENDF© 

GETN D(1$I,J)© 
ENDF© 
ENDR© 
ENDM© 



SET and RESET change the setting of flags. STACK is used 
to put values and pointers on "stacks" (these are not physi- 
cal stacks in memory but rather conceptual ones existing in 
the assembler's symbol table). STACK functions by creating 
an ordered progression of names and assigning values to the 
names by means of the EQU directive. 



SET MACRO D;D(1) EQU 1; ENDM© 
RESET MACRO D;D(1) EQU 0; ENDM© 
STACK MACRO D;TS EQU D(2) .PTR+1® 
D(2).PTR EQU TS;D(2).ST.($TS) EQU D(l)© 
ENDM© 



GETN fetches the next operand. Its complexity is due to 
the fact that it must recognize symbols (in this example, 
using the assembler's symbol rules) and numbers. When this 
recognition is complete it puts in the operand stack a pair 
of pointers to the head and tail of the operand (i.e., char- 
acter numbers in the string and a flag bit which denotes 
whether the object is a symbol or a number). Note that if 
an opening bracket is encountered, GETN calls EXPAND 
recursively. 



GETN MACRO D;T0 EQU I; RESET ERROR© 
GETC D(1$I-T0+1)© 

IF CHAR='[ » ;I.($K) EQU I; EXPAND D(1$2,J)© 
ELSE© 

IF LETTER; RESET NUMBER® 

ELSE; SET NUMBER© 

ENDF© 

IF DIGIT; SET SWITCH© 

CRPT SWITCH; GETC D(l$I-TO+l)© 
IF DIGIT© 
ELSF LETTER; RESET SWITCH© 

IF CHAR='B'; GETC D(1$I-T0+1) © 
IF LETTER; RESET- NUMBER© 
ELSF DIGIT; RESET NUMBER© 
ENDF© 
ELSE; RESET NUMBER© 
ENDF© 
ELSE; RESET SWITCH© 
ENDF © 
ENDR © 
ELSF LETTER © 
ELSE; SET ERROR© 
ENDF© 
IF NUMBER© 
ELSE; SET SWITCH© 

CRPT SWITCH; GETC D(1$I-T0+1) © 
IF LETTER © 
ELSF DIGIT© 
ELSE; RESET SWITCH© 
ENDF© 
ENDR © 
ENDF © 

IF ERROR; ERROR; STACK 0,N© 
ELSE; STACK TO*lB4+I-2+4B3*NUMBER,N© 
ENDF© 
;I EQU 1-1 © 
ENDF © 
ENDM © 
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GETC's main function is to determine whether a given char- 
acter is a letter, digit, or other type of character. GETP 
fetches the next operator. It checks the results, and if 
valid, sets OPTOR to a value carrying both operator and 
precedence information. 



GETC MACRO D;CHAR EQU 'D(l) '© 

;I EQU I+1;A EQU CHAR>'Z';B EQU CHAR<*A'® 
IF A(OR)B;A EQU CHAR>'9*;B EQU CHAR<'O'0 
IF A(OR)B; RESET LETTER; RESET DIGIT @ 
ELSE; SET DIGIT; RESET LETTER® 
ENDF® 
ELSE; SET LETTER; RESET DIGIT© 
ENDF© 
ENDM © 



GETP MACRO D; GETC D(l)© 

IF LETTER (OR)DIGIT; ERROR © 

ELSE;A EQU CHAR>11B6;B EQU CHAR<20B6 © 

IF A(AND)B;OPTOR EQU OPS. ($CHAR/1B6) © 

ELSF CHAR='] '; OPTOR EQU 11© 

ELSE; OPTOR EQU -1© 

ENDF © 

IF OPTOR=-l; ERROR; OPTOR EQU 40® 

ENDF © 
ENDF© 
ENDM© 



GEN and GENA serve to reconstruct the operands from 
the string pointers and call generators that actually pro- 
duce code. 



GEN MACRO D;R EQU -1;PP2 EQU PST.($PPTR)© 
;PP3 EQU NST.($NPTR-1)© 
;PP4 EQU PP3/1B4;PP5 EQU PP3-PP4*1B4® 

IF PP5>4B3;PP5 EQU PP5-4B3; SET LIT1 © 
RESET LIT2© 

ELSE; RESET LITl; RESET LIT2 © 
ENDF© 

IF PP3>1B4; GENA D(l) ,D(1$PP4,PP5)® 
ELSF PP3>0: GENA D(l) .TEMP. ($PP3) © 
;AVAIL EQU PP3 ® 

ELSF PP3=-1; GENA D(1),AREG© 
ELSF PP3=-2; GENA D(1),BREG© 
ENDF© 
;NPTR EQU NPTR-2; STACK R,N© 
;PPTR EQU PPTR-1;PSTAK EQU PST.($PPTR)© 
ENDM© 



GENA MACRO D;PP5 EQU NST. ($NPTR)® 

;PP6 EQU PP5/1B4© 

;PP7 EQU PP5-PP6*1B4© 

IF PP7>4B3;PP7 EQU PP7-4B3; SET LIT2 ® 

ENDF © 

IF PP5>1B4; GEN.($PP2) D(2) ,D(1$PP6 ,PP7)© 
ELSF PP5>0; GEN. ($PP2) D(2) ,TEMP. ($PP5) © 

; AVAIL EQU PP5 fe) 

ELSF PP5=-1; GEN. ($PP2) D(2) ,AREG © 
ELSF PP5=-2; GEN. ($PP2) D(2),BREG© 
ENDF© 

ENDM © 



GEN20, 21, 30, 31, and 40 are the code producing macros. 
They reference LIT! and LIT2 (flags set by GEN and GENA) 
and call macros TEST, LA, LB, and ST. The purpose of the 
latter macros is to interpret contents of the A and B registers 
to prevent superfluous code. 



GEN20 MACRO D; TEST D(1),D(2) 


,X © 


LA D(X),LIT.($X)© 




IF X=l © 




IF LIT2; ADD =.D(2)® 




ELSE; ADD D(2) © 




ENDF ® 




ELSE ® 




IF LITl; ADD =.D(1) ® 




ELSE; ADD D(l) © 




ENDF © 




ENDF © 




ENDM © 





GEN21 


MACRO D; 


TEST 


D(2),X © 


IF 


SC; LA D(2) 


,LIT2 


© 




IF LITl; 


CNA; 


ADD =.D(1)© 




ELSE; CNA 


; ADD 


D(l)© 




ENDF© 






ELSE; LA D(l) 


,LIT1 


© 




IF LIT2; 


SUB = 


.D(2)© 




ELSE; SUB 


D(2)© 




ENDF© 






ENDF © 






ENDM 


© 







GEN30 


MACRO D; 


TEST D(1),D(2) 


,X© 


LA 


D(X),LIT 


($X)© 




IF 


X=l© 








IF LIT2 


MUL =.D(2)© 






ELSE; MUL D(2)© 






ENDF© 






ELSE© 








IF LITl 


MUL =.D(1)@ 






ELSE; MUL D(l)© 






ENDF© 






ENDF© 






;R 


EQU -2 






ENDM 









GEN31 MACRO D; TEST D(2),X© 

IF X; ST D(2$l); LB D(1),LIT1© 
DIV TEMP.(-$AVAIL) © 
ELSE; LB D(1),LIT1© 

IF LIT2; DIV =.D(2)© 
ELSE; DIV D(2)® 
ENDF® 
ENDF © 
ENDM© 



GEN40 MACRO D; NOP D(l); NOP D(2)® 
ENDM® 



LA MACRO D © 

IF 'D(l) ^'AREG' © 

ELSF 'D(l) '='BREG'; LSH 23© 

ELSE ® 

IF D(2); IDA =.D(1)® 
ELSE; LDA D(l).© 
ENDF© 
ENDF© 
ENDM® 
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LB MACRO D © 

IF 'D(l) '='BREG'© 
ELSE® 

IF 'D(l) ' = 'AREG'© 
ELSE © 

IF D(2); LDA = .D(1)© 
ELSE; LDA D(l)® 
ENDF ® 
ENDF ® 
RSH 23 © 
ENDF© 
ENDM® 



Result: 



ST MACRO D © 

IF 'D(l) ' = 'BREG'; RSH 1© 

ENDF© 
ST.D(1$1) TEMP. ($A VAIL)© 
ENDM© 



Call: 



TEST MACRO D;Y NARG;D(Y) EQU 0© 
RPT (Z=1,Y-1)© 

IF 'D(Z$1,4) '='AREG';D(Y) EQU Z © 

ELSF 'D(Z$1,4) ' = 'BREG';D(Y) EQU Z© 

ENDF © 
ENDR© 
IF Y>2 © 

IF D(Y)=0;D(Y) EQU 1 © 

ENDF © 
ENDF © 
ENDM © 



LDA 
MUL 
ADD 



=200 

Y 

X 



Call: COMPILE AB-[C+D]/[E+F] © 



Result LDA 
ADD 
STA 
LDA 
ADD 
STA 
LDA 
RSH 
DIV 
CNA 
ADD 



COMPILE 



The following lines establish precedence information for the 
arithmetic operators. 

OPS10 EQU30;OPS11 EQU 20;OPS12 EQU -1 

OPS13 EQU21;OPS14 EQU -l;OPS15 EQU 31 

When called by the following lines, the macro generates 
code as shown 

Call: COMPILE X+200*Y © 



Result LDA 
MUL 
LSH 
ADD 
STA 
LDA 
RSH 
DIV 
STA 
LDA 
MUL 
LSH 
ADD 
MUL 
DIV 
CNA 
ADD 
SUB 
RSH 
DIV 
CNA 
ADD 
SUB 



C 

D 

TEMPI 

E 

F 

TEMP2 

TEMPI 

23 

TEMP2 

AB 



A+200*34C2 1 - [DEF/34B-HI* © 
+[J+20*K]/LM33B -N]/OPQ-22 © 



=200 

34C21 

23 

A 

TEMPI 

DEF 

23 

=34 B 

TEMP2 

-20 

K 

23 

J 

HI 

LM33B 

TEMP2 
N 
23 
OPQ 

TEMPI 
=22 
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